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if (iTfC !• 1) 

print* <"Ut*ft: FIND -x -n pttttmv 
•1st * 

«hiU (•etUnedintiNMO.IrC) > I) 
lineno"; 
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"Boy Am I Glad 
I Found You!" 



People say this to us all the time. 
In fact, we'll go so far as to bet that if 
you spend a couple of minutes reading 
this article, you'll say the same thing. 

Applied Creative Technology Inc. 
applies technology creatively. We 
produce machines that most computer 
dealers wouldn't dare tell you about. . . 
machines that deliver even more than 
what is expected of them (customers 
often tell us this too)... machines that 
can save you lots of money and 
headaches. Chances are if you do 
much computing at all, and use a 
printer or modem, you would benefit 
from having one of our products. 

Enough of the promises... let's 
get to the facts. 



"The Printer Optimizer 

has increased the 

performance of our 

system by 6000%, 

saving us thousands 

of dollars a year." 



Our product line covers a myriad 
of applications. One product, the 
Printer Optimizer, is a printer and 
modem control center. It offers data 
spooling (using a 64K to 1 Meg 
buffer), the ability to connect several 
printers or modems to a single 
computer — without extra adaptors or 
software, and even the ability to 
modify or filter out data passing 
through it. A fellow from McDonnell 
Douglas told us: "Every computer 
department ought to have a Printer 
Optimizer in their bag of tricks. It's 
great!" . 

The Printer Optimizer is also 
particularly useful to owners of laser 
printers. When you call for info, tell 
us if you have a laser printer — and if 
you do own a laser, you should call. 

Another product, the Systemizer, 
allows several PC's or CRTs to share 
one or more printers. 
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"The Systemizer 
is the perfect 
solution for 
sharing a high 
cost printer 
like a laser or 
plotter between 
several PC's." 



To up to 12 more 
computers and printers. 

Businesses ranging from small 
law firms to almost 100 of the 
Fortune 500 are using Systemizers to 
save big dollars by eliminating print- 
ers and the office space and service 
costs associated with them Now you 
can afford to own better printers like 
laser printers and plotters. 



"The Systemizer is all 

the network many PC 

users need." 

Jim Seymour, PC Week 



The Systemizer is indeed the best 
solution for sharing printers you'll 
find. That's a bold statement, so we 
suggest you get a copy of our article 
"The Wasted Buck Stops Here" and 
see if you don't agree. 



"Now that the 

Systemizer is available, 

buying a LAN to share 

printers is like buying 

an aircraft carrier to 

go water skiing!" 



"Your 1 Megabyte 
printer buffer is a 
dream come true." 



We also make a complete line of 
printer buffers and full fledged 
spoolers, with buffer capacities 
ranging from 64K to 1 Megabyte. 
Our latest creation is the Buffer 
Box. It's the lowest cost full- 
feature printer buffer available. 
Anybody who owns a printer should at 
least have one of these little wonders. 
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Printing from a micro 

without a printer 

buffer is like trying to 

drain Hoover Dam with 

a soda straw." 



You know, we hear the same 
refrain over and over: "Geez! I wish I'd 
known about you before I bought. 
In addition to the products mentioned, 
we also make a computer adapter for 
IBM Electronic Typewriters and some 
amazing boxes that adapt the Hewlett 
Packard LaserJet to various computers 
and word processing systems. Call us 
now before you waste any more time 
or money. You'll be glad you did. 



Applied 

Creative 
Technology 



Inc. 



2156 Northwest Hwy. 
Dallas, TX 75220 USA 

(800) 433-5373 
(214) 556-2916 

(TWX 9103332410 AmXftEATEC] J) 



Did you know? 

Only one spelling checker-. 

• works with both Scripsit and Superscripsit. 

• integrates with all other popular word processing programs as well. 

• requires no special document placement! Even runs on a single drive system. 

• displays its dictionary so that you can find the correct spelling of words. 

• offers integrated Hyphenation Option and Grammar & Style checker. 

Electric Webster 

SPELLING CHECKER' AUTO-HYPHENATION GRAMMAR CHECKER 



Displays Correct Spellings: If you don't 
know the correct spelling of a word, 
EW w ill look it up lor you. and display 
the dictionary 

Verifies Corrections: If you think you 
know the correct spelling of a word. 
EW will check it for you before nuk- 
ing the corrections. 

Hyphenates Automatically: (Optional). 

Inserts discretionary hyphens through- 
out text. 

Grammar & Style ( hecker: ( ( )pt ional ) 
Identifies 22 types of common errors. 
Makes suggested corrections with the 
stroke of a key. Runs within EW, 

50,000 Word Dictionary: Uses onl) 

2 Vz bytes per word; add as many words 
as you wish. 

Fast Correcting: In as little as 30 sec- 
onds. Electric Webster can return you 
to your Word Processing program, 
with your text fully corrected and on 
your screen. 

Integrates: with WordStar, Dcskmate, 
Spellbinder. Volkswriter. Open Access. 
Allwrite, Newscnpt. I a/y Writer, Sup- 
erscripsit. Scripsit. Electric Pencil, 
Copy Art. Powcrscript, Zorlof, and 
I.eScript (specify). Begins proofing at 
the stroke of a key; returns you to 
word processing automatically. 

When ordering, stipulate word proces- 
sing program and operating system. 

Circle 45 on Reader Service card 



"The Cadillac" 
of spelling checkers 

— SO Microcomputing, 9/82 




ACCLAIMED: 

Ctric Webster is the best lust read 
an} review many magazine and I don't 
believe that you will find even one dis- 
agreement to that statement." ( /\ 
TUG, Cincinnati's Users Group Mag. 
4 83 

"The most helpful program I've found 
is Electric Webster. After looking at 
nine proofreading programs. I've set- 
tled on Webster . . ." Creative Comput- 
ing 1 1 83 

i iit> i% no! puNr»hnlb> 'IfceMifiMl pttbWttflol Hrh<te\ 
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Performance "Excellent"; Documenta- 
tion "Good": Ease ol I'se "Excellent"; 
Error Handling "Excellent". Info 
World, 8 82 

"Electric Webster, a fantastic spelling 
and grammar checker "80 Micro 4 1 85 

Nowsee 
for yourself! 



Try Before \ou Buy: 

For the second straight year. SO 
Micro readers have voted Elec- 
tric Webster the n\ Spelling 
checker. Find out for yourself how ac- 
curate, fast and easy proof-reading can 
be I or only the $5 cost ol postage, 
materials and handling, we will send 
you a special Electric Webster demon- 
strauon disk that works just like Web- 
ster, but prools only halt the alphabet. 
With it. \oifll get a coupon worth S5 
towards the purchase of Electric Web- 
ster. 

LOW PRICES: 

I -RS-X0. Model I III or IV S 89.95 
w Correcting Feature S 149.95 

Hyphenation S 49.95 

(irammar & Style Checker S 49.95 

( P \1. PC DOS. Model 1000 2000 
Electric Webster. 

v. Correcting Feature. $169.95 

Hyphenation, and (irammar 




Cornucopia Software 

POST OFFICE BOX 6111, ALBANY, CALIFORNIA 94706, PHONE (415) 524-8098 
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GREAT PROGRAMS, AND FREE SHIPPING TOO! 

We've still got our very popular T/Maker and Word Processor deals continuing this month, 
as well as a new addition of T/Maker for the Tandy 1000 and other MSDOS machines. Since 
you'll probably be reading this as the holiday season begins to approach (at least for the retail 
business), I'm sure you'll want to consider us for that hard-to-please TRS-80 user on your gift 
list And if you plan on giving an Infocom game, better get em soon because Infocom has 
discontinued production for the TRS-80 computers. . it's a "while supplies last" basis from 
now on. I've run out of room now, so I'll leave you with this prediction: if Cadbury ever comes 
out with a computer, they'll probably use chocolate chips. 



PASCAL-80 






Easiest version of Pascal to learn 1 Editor and Com- 
piler are already in memory Nearly complete subset 
of standard PASCAL Offers also many extensions 
to Pascal, including calls to machine language, 
screen control, random access files and more! 
Models l/lll (List $79) $59.50 



PRONTO 



Specifically designed for the 128K TRS-80 Model 
4/4P Window controller program with many applica- 
tions. Includes calculator, calendar, a sort utility, ter- 
minal facility, address cards, on-line help facility, and 
much more. "Sidekick" for the Model 4! 
Models 4/4P $54.50 



P0WERD0T II 



"The best high-resolution bit-image graphics pro- 
gram on the market for the TRS-80 " Screen 
becomes a window on large lull-page drawing board. 
AUTODRAW feature for lines and circles. POWER- 
DOT II is 100% Machine Language (Specify printer 1 ) 
MODELS l/lll $29.50 



PUBLIC DOMAIN DISKS 

A fine collection of software from The Alternate 
Source! 

Public Domain Disk (specify #1-#12) Each $ 9.50 

Public Domain Package *1#6 $49.50 

Public Domain Package #7-rt2 $49.50 

Public Domain Package #1-#12 $89.50 



EDAS/PRO-CREATE 

One of Misosys' most popular utilities Both a Full 
Screen Text Editor as well as a powerful Macro 
Assembler. Assembler supports nested macros, in- 
cludes, and conditionals. Works excellently under 
most DOSes 
Models l/lll and 4 $69.50 



SUPER UTILITY 

The indispensable first-aid kit for the TRS-80 
users "Contains over 60 different utilities for repair- 
ing, reviving dead dies reformatting, manipulation 
of files, and lots more! 

Super Utility Plus (Models I & III) $59.50 

Super Utility 4/4P & MSDOS $69.50 
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PACKAGE DEAL! 

MTERM 
MSCRIPT 
D0SPLUS IVa 



• * 



* * 



• * 
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SUPERCR0SS XT 



Designed specifically for transferring 

data and program files between 

TRS-80 disks and those of 

other computers 



Models l/lll or 4 . SM SO 

with Convert Bask option sn? 50 



A complete operating system has just become very 
affordable! This new deal offers an operating system 
that is much faster and easier to use than TRSDOS. Not only 
is DOSPLUS IVa itself very user-friendly, it also offers a built-in 
menu driving system, and of course, GREATLY enhanced 
BASIC. Other included features of DOSPLUS IVa are: Text 
Editor, Linker, Assembler; Directory Verification/Repair, Disk 
Mapping, and File & Disk Editing. As if that is not enough, you 
now also get MSCRIPT with your purchase of DOSPLUS IVa. 
That's right, one of the easiest and most convenient to use word 
processors goes with your purchase. Also, MTERM Smart Ter- 
minal (one of the best full featured TRS-80 terminal programs 
available) is included in this deal In addition to all of the 
remarkable features of MTERM, it will also enable you to log 
on to local Bulletin Boards and tell your friends about this fan- 
tastic deal! 

DOSPLUS IVa / MSCRIPT / MTERM Package Deal 

Models 4/4P (List S329.85) S159.50 
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WORD PROCESSOR • SPREAD SHEET- GRAPHICS 
• DATA BASE • & MORE! 



This integrated software package for the Models 4/4P, as well as 
for MSDOS. combines many functions to become one of the best 
software deals available for any computer. Included are Word Pro- 
cessing. Spread Sheet Analysis (which provide a full range of 
mathematical functions). Relational Database Management 
(allows merging, multiple selection criteria, restructure of 
DataBase, Multiple Sorting etc.). Spelling Checker (55,000 word 
dictionary, correction feature, ability to create personal and pro- 
fessional dictionaries), Bar Chart Graphics (created directly from 
Spreadsheet data and supported on any printer), and finally. Data 
Encryption If you are worried about learning T-Maker. worry no 
longer. It has excellent documentation and comes equipped with 
a Tutorial on the disk. Not only is it a great program, but it is also 
at a great price!!! 

Model 4/4P (List $299) $194.50 

MSDOS version (List $450) $294.50 



LE SCRIPT 



Great printer support, full Model 4 support and 
much more! On a 128K Model 4, you can have 
over 90K of text buffer for use on a single 
file Model 4 features available while running 
in Model III mode. By far LeScript is our 
most popular program! 



Models l/lll or 4 (List $129.95) 



S94 50 



WORD PROCESSING 

PACKAGE DEAL 

LeScript and Electric Webster 

together 1 ! Needless to say, these two 

great programs work excellently 

together' 

W P. Package (List S279.90) S 199 50 




ELECTRIC WEBSTER 



ncludes 50,000 word dictionary Features fast check- 
ing, interactive correcting and personal dictionary 
expansion (Specify computer and word processor 
when ordering) 

Electric Webster (Models l/lll or 4) 
(List $149.95) $119.50 

Grammar or Hyphenation options 
(List $49.95) Each $38.50 






APPLICATIONS/BUSINESS 

T-Maker (Model 4/4P) $194.50 

(MSOOS Ver.) $294 50 

TFC BBS S 99.50 

Powerdot II S 29.50 

POWERMAIL PLUS S 98.50 

POWERMAIL PLUS w/Txt Merge $128.50 

LESCRIPT $ 94.50 

LESCRIPT CP/M S149.50 

LESCRIPT MS/DOS S149.50 

ZORLOF II $ 49.50 

MSCRIPT $ 54.50 

LAZYWRITER $ 99.50 

TYPEITALL $ 99.50 

PowerScript (New Version) $ 34.50 

PowerDriver $ 24.50 

Electric Pencil $ 74.50 

Electric Pencil w / Spell Check $139.50 

EDX Text Editor (Mod l/lll) $ 24.50 

TEXTPRESS $ 39.50 

ELECTRIC WEBSTER $119.50 

E.W. Options (each) S 38.50 

E.W. MS/DOS (Includes options) S149.50 

Datagraph with Pie Option S109.50 

Graphit S 34.50 

PowerDraw $ 34.50 

Mumford's Disk Indexer S 34.50 

Howe's System Diagnostic S 89.50 

J & Ms Disk Drive Analyzer - I S 84.50 

J & Ms Disk Driver Analyzer - III ... . S 74.50 

ENBASE Data Base Manager S 64 50 

EDIT (Models l/lll) S 18.50 

Home Accountant (Model III) S 59.50 

VersaLedger II (Models l/lll) $134.50 

Versa Series (Models l/lll) each S 89.50 

TAS's ZMAIL Mail List $ 24.50 

PowerMail Plus $ 98.50 

Macro Typing Tutor $ 24.50 

Lazycomm Terminal S 29.50 

Disk Term Terminal $ 59.50 

MTERM Smart Terminal S 59.50 

DOSPLUS 3.5 (Models l/lll) $ 59.50 

DOSPLUS IVA (Model 4/4P) $119.50 






ELECTRONIC 
NOTEBOOKS 

KSOFT 

SUPERLOG 4 $99.50' 

SUPERLOG 3 (l/lll) $99.50 

LOG (Model I) S44.50 

LOG (Model III) $44.50 



GAMES 

SUPREME RULER PLUS S26.50" 

' FLIGHT SIMULATOR S29.50 

NUCLIEX S14.50 

APE $14.50 

SIFTER SHIFTER $ 8.50 

BATTLE OF ZEIGHTY S 8.50 

, FOREST FIRE DISPATCH S26.50 

WARRIORS AND WARLOCKS (D&D Adv.) S39.50' 
THE ADVENTURE SYSTEM S34 . 50 , 

THE BOOKSHELF 

Using Super Utility $14.50 1 

ROM ROUTINES Documented S16.50 

Model III Assembly Language $15.50 ' 

The C Programming Language $17.50 , 

Programmers Guide to TRSDOS 6 S14.50 

TRS-80 Disk and Other Mysteries S16.50 ' 

Basic Deeded and Other Mysteries S23.50 

TRSDOS 2.3 Decoded S23.50 

Machine Language Disk I/O $23.50 

The Custom TRS-80 S23.50 

How To Do It On the TRS-80 $23 50 

Basic Faster and Better $23.50 , 

DFBLIB or BFBOEM Disks each S17.50 

Basic Disk I/O $23.50 ' 

DFBLOAD Disk $23.50 

inFocom 

Better be careful out there... Infocom's latest 
adventure seems to be the phasmng out of their 
TRS-80 line We will do our best to keep these 
popular games m stock, but once they run out. 
they are gone for good Hitchhiker's Guide 
our first casualty! 

•Standard Level" Each S34.50 

PLANET FALL WITNESS 
ENCHANTER CUTTHROATS 

Intermediate Level" Each $39.50 

Z0RKII ZORK III 

SORCERER INFIDEL 

Very Difficult Level" Ei 

DEADLINE STARCROSS 

SUSPENDED 



MONTHLY 
SPOT UGHT 

ZBASIC 3.0 

This long-awaited basic compiler Is final- 
ly here! Enhancements included on this 
program include Device Independent 
Graphics, up to 54 digit numeric ac- 
curacy, a built-in interactive Editor and 
Compiler, structured Programming Con- 
structs, and of course that is only scrat- 
ching the surface. The nicest thing about 
ZBASIC is that the commands stay the 
same no matter what computer brand you 
L use! Probably the best basic compiler^ 
arojnd for any computer! 



UTILITIES 

Alcor C Compiler S 84.50 

Alcor Multi-Basic Compiler S 84.50 

Super Utility 4/4P $ 69 50 

Super Utility 3.2 $ 59.50 

Super Utility MSDOS $ 69.50 

Supercross XT $ 94.50 

Supercross XT w/CnvBasic $112.50 

Autoloader $ 34.50 

PRONTO (Model 4/4P) S 54.50 

Other MISOSYS Utilities each S 23.50 

Edas / PRO-CREATE $ 69.50 

DSMBLR III / PRODUCE S 23.50 

Edas/Dsmblr Combo $ 89.50 

DIS" n' DATA l/lll S 37.50 

DIS n' DATA (Model 4/4P) S 46.50 

TASMON Monitor (Models l/IH/4) $ 34.50 

Howe's Monitor #5 S 19.50 

CNVBASIC (Models I/III/4) $ 27.50 

Model 4 TOOLBELT $ 39.50 

TOOLBOX lor LDOS $ 39.50 

TRAKCESS (Mod I) $ 19.50 

TRAKCESS (Mod III) $ 24.50 

PRO ESP Utility Set (Model 4/4P) ... $ 23.50 

6.2 Plus Enhancements S 36.50 

Impakl Utility $ 29.50 

NEWBASIC w/Analyst $ 34.50 

Analyst only $ 19.50 

ALE - Assembly Language Editor $ 39.50 

M-ZAL Macro Assembler (Model III) . . S 79.50 

Mumford's Instant Assembler $ 44.50 

Instant Assembler (Model 4/4P) S 59.50 

ZEN Assembler $ 34.50 

PASCAL 80 Compiler S 59.50 

PASCAL 80 lor CP/M $ 36.50 

LC / PRO-LC Compiler S114.50 

SBE Compiler $ 46.50 

ACCEL 3/4 Compiler S 44.50 

ZBASIC Compiler S 84.50 

HartFORTH/PRO-HartFORTH S 69.50 

Backrest Utility S 84.50 

MULTIOOS Version 1.7 S 79.50 

MULTIDOS (Model 4/4P) S 89.50 



S84 50 



OUR GUARANTEE: 

We sell only top-quality software. If. however you are unsatisfied with 
a product, you may return it within 10 days (in good condition) for a 
refund, less $2 50 handling charge for programs under $50 ($5 for 
programs over $50). We also ask for a letter stating the reason for 
your return 

We will also beat any competitor's price by $1.00 (same conditions 
as competition, ie shipping charges etc.) if you tell us where they 
advertise their price. 



TO ORDER: 



We accept orders by phone or mail. Specify your TRS-80 Model, exact 
program(s) wanted, and method of payment. We accept VISA, Master- 
Card, Check, and Money Orders (CO D orders add S2 50 and Gov t Pur- 
chase Orders add $5.00) Electric Webster orders please specify Word 
Processor Free shipping to continental U S and Canada All prices are 
m U S Funds Prices subject to change without notice 



10 a.m.- 7 p.m. Monday to Saturday 



y/7c7 /M&m f //av/z 



3235 Lockport Road 

Niagara Falls, 

N.Y. 14305 



CONVERSION 
PROGRAMS 

BASIC 3 TO 4 CONVERT 

Model 4/4P ONLY (list $49.95) $39.50 

BASIC 4 TO 3 CONVERT 

Model l/lll (list S49.95) $39.50 

BASIC GW CONVERT 

Model 4/4P ONLY (list S99.95) $89.50 

CONVERT BASIC 

Models l/lll and 4 (list $29.95) $27.50 



ORDERS & INFORMATION 
(416) 575-3201 



801 Mohawk Road West 
Hamilton, Ontario 
Canada L9C 6C2 



(416) 575-3201 
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PowerSoft NewsFlash #2 

Advertisement 

Thank you lor reading our newest installment of PowerSoft's Newsflash This is a mini-version of our 
PowerSoft Newsletter that will contain information that doesn't really fit into regular ad-type format. 
Please let us know your comments. We appreciate heanng from you. H you are a brand new TRS-80™ 
owner, then congratulations and welcome! You've come to the right place! 

Not only is PowerSoft still here supporting the TRS-80 after six years, but we are now supporting the 
newer 'standards* with our Super Utility/PC for PC/MS-DOS™ and SuperCross/XT, the state-of-the-art 
transfer utility recently raved about in BO-MICRO, ft you have a TRS-80 and a PC of some type, like a 
Model 1000, you 7/ detinilfy want to order this program. See our ad elsewhere in this issue for more details. 

Them are LOTS ol new Mod 4 and 4P owners In our ranka now, thanks to TANDY'S drastic 
price reductions earlier this year. A great time to pick up a new computer and super buy, if you want the 
latest in TRS-80 technology, other than the new 40 (sM a great buy at $1 199. when compared to what 
most ol us had sunk into Mod I's Ills and 4/4PS before the prices were slashed) . We're looking at the 
Model 40 to continue for some time to come. And we will be here to support it. 

Speaking of the 4D, all of our Model 4 producta have alwaya aupporl doubla-aldad 
operation, ao no update will be necessary if you buy a 4D or add double-aided drivea. 

By the way, TRSDOS 6.2 wil already support double-sided operation! You do not need to obtain the 
rumored TRSDOS 6.2.1 just lor this. Type: FORMAT :1 (Sir>ES=2) <ENTER> and everything else is 
automatic. Just thought we'd mention this, since many didnl know.. Also, use LDOS for Model III mode 
on the 40. as this system also already allows double-sided operation in the III mode (same method) and e 
media compatible with TRSDOS 6. 

Ok, what's new this month? 

AFM - the Auto File Manager. 

A new generation of truly relational data-base for the TRS-80 from PowerSoft. 

Cj^ 3 Special Introductory price on this new iteml 
Only $99.95!+ $3 s/h 

A new generation of data base systems. Works on Model III, 4(111) or MAX BO. Works with most popular 
TRS-80™ operating systems. At least one disk drive required - two is better. Hard drive is great! AFM will 
work on a Mod I. but double-density, LDOS. & lower case are required 

You may think we're crazy, but we have a new data-base system. Why would we do that NOW? There is 
(or was) PROFILE"-. PROFILE*™, MAXI MANAGER™. EN8ASE™. etc, etc.. etc Well, when we got our 
lirst Model I. the concept of what a data base manager could do was definitely exciting. We bought or 
looked at all of them as they came out and never really stuck with ANY of them for anything serious. (We 
ended up writing PowerMAIL* to keep our product registrations on). None of them were what that we had 
pictured. They didn't have any 'magic* to them. None of them handled information in an easy way to enter. 
look up. and print out that was logical, efficient, and flexible. YES. The keyword here la FLEXIBLE. 
You see, most data bases do allow you the flexibility to 'design* your screen, field lengths, etc. but once 
you had that entered, and were adding names, you were stuck with it. If it was changeable, at all it 
certainly wasn't changeable from name to name! Another reason is thai the TRS-80™ needs a new 
database manager! Why? There are millions of the machines out there that can get some real work done 
for youl You don't need a PC to do complicafed relational reports from your stored data (or even simple 
ones)! Just program the computer property is all! 

This project has been in work for over two year6 now. We did a special beta offer to our registered 
customers last year and had them use the system and get back to us with what they like, what they d>dnt 
like, and what they would like to see in the system. One year later - the new AFM is ready. It contains 
every feature from everybody's "wish list* that made sense or was possible. Then, we put THAT version 
into local beta-testing. AFM is what even/ computer owner WANTS to do with their computer. AFM makes 
maximum use of the TRS-80™ and competes favorably with many available lor PC type computers! It 
can only be compared to DBASE lit™ or R;BASE 5000™. as far as concepts and power. AFM is a 
language that you can program your database in! Contains a template* where you may simply fill in your 
options in plain English. AFM is a free-form entry system, which means that you can enter your data 
in any manner you wantl You are Qfli limited to a particular screen format. In fact, each record can have 
its own individual display lormatl Really!! You would have to go to a PC to get this kind of power otherwise! 



On-line help, advice, answers and ordering, 
Visit the PowerSoft SIO on CompuServe™ , 



(Type GO PCS-56 from any menu prompt') 



By the time you read thia, we should have a brand new catalog ready to gol If you are not on our 
mailing list and would like to receive a copy, please drop us a note or call and ask lor one. 

Read through our other ads elsewhere in this issue and see if there is anything of interest to you. ff you 
have been one of our customers for years, THANK YOU! We have several new additions, some price 
reductions, and some great specials. We're here to help you, so if you have ANY questions please write or 
call. If you can recommend our products to your friends or associates, please do! There are TOO MANY 
TRS-80 owners out there who still haven't heard of us or even 80MICRO! Help us and help your friends. 
Give them our address or phone number and suggest they ask us for a catalog, ok? Thanks. 

Happy Holidays! Please drive safely. 



17060 Dallas Parkway, Suite 114 
Dallas, TX 75248 • 214/733-4475 
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The let! bracks!, I. replaces the up arrow used by Radio 
Shack to indicate exponentiation on our printouts When en- 
tering programs published in 90 Micro, you should make this 
change 

BO formats its program listings to run 64-characlers wide, 
the way they look on your video screen. This accounts lor 
the occasional wrap-around you will notice In our program 
listings. Don't let It throw you. particularly when entenng as- 
sembly listings 

Article submissions from our readers are welcomed and en- 
couraged Inquires should be addntaaed to: Submteatona Ed- 
ttor. 80 Pine Street, Peterborough, NH 03458 Include an 
SASE lor a copy ot "How to Write lot BO Uicro." Payment lor 
accepted articles Is made at a rate ol approximately $50 per 
printed page: all rights are purchased 
■TRS-80. Scripslt, and TRSDOS are trademarks ot Radio 
Shack, a division ot Tandy Corp 



BO Uicro (ISSN-0744 7868) is published monthly by CW Com 
municatlons/Peterborough Inc . 80 Pine St . Peterborough. 
NH, 03458 Phone 603-924-9471 Second class postage paid 
at Peterborough, NH. and additional mailing oflices (Cana- 
dian second class mail registration number 0583.) Subscrlp 
lion rates In U S are $24 97 lor on« year. $38 lor two years, 
and $53 lor three years. In Canada and Mexico $27 97 -one 
yeai only. U.S. hinds drawn on a US bank Nationally dis 
trlbuted by International Circulation Distributors Foreign 
subscriptions (surface mall). $44 97— one year only U S 
funds drawn on a U S bank Foreign subscriptions (air mall) 
please Inquire In South Africa contact 80 Uicro P.O. Box 
782815. Sandton. South Alrica 2146. All subsciiption corre- 
spondence should be addiessed lo 90 Uicro. Subscription 
Department. P.O Box 981. Farmingdale. NY 1 1737 Please 
include your address label with any correspondence Post- 
master Send address changes to 80 Uicro. Subscription 
Services, P O Box 981, Farmingdale. NY 11737 Send Cana- 
dian changes of address (o 90 Uicro. P.O. Box 1051. Fort 
Erie. Ontario L2A 5N8. Canada. Return postage guaranteed 



Entire contents tc: copyright 1985 by CW Communications! 
Peterborough Inc No pan ol this publication may be reprinted, 
or reproduced by any means, without prior written permission 
from the publisher All programs are published for personal 
use only. All rights reserved 
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Load 80 gathers together selected pro- 
grams from this issue of 80 Micro and 
puts them Ml a magnetic' medium for your 
convenience. It Is available on tape or disk, and 
runs on the Models I. III. and 4. 

Load 80 programs are ready to run. and can 
save you hours of time typing in and debug- 
ging listings. Load 80 also gives you access to 
Assembly-language programs if you don't 
have an editor/assembler. And. it helps you 
build ■ substantial software library. 

Using Load 80 is simple. If you own a tape 
system, load the Load 80 tape as per the in 



struct ions provided. If you own a Model I or III 
disk system, you boot the Load 80 disk and 
transfer the hies to a TRSDOS system disk ac- 
cording (o simple on-screen directions. If you 
own a Model 4. copy the Model 1 programs 
from the Load 80 disk to your TRSDOS 6.X 
disk using the COPY command. 

Not all programs will run on your system. 
Some Model III programs, for instance, will 
run on the Model 4 in the Model III made, hut 
not In the Model 4 mode. You should check the 
system requirements box that accompanies 
the article to find out what system configura- 
tion individual programs require. 

If you have any questions about the pro- 
grams, call Keith Johnson at 603-924 947 1 
Yearly subscriptions to Load 80 are $199.97 
for disk, or $99.97 for cassette. Individual load- 
ers are available on disk for $2 1 .47 or on cas- 
sette for $1 1 .47. including postage. To place a 
subscription order, or to ask questions about 
your subscription, please call us toll free at 1- 
800-343-0728 between 9 a.m. and 5 p.m. Or. 
you can write to Load 80. 80 Pine St.. Peter- 
borough. NH 03458. 



Directory 


C Trainer 


Disk filcspecs: SINEWAVE/BAS. 


Article: Write Away (p. 41). 


PRISMRNG/BAS. VIEWPORT/BAS. 


System: Model 4. 64K RAM. 


WINIX)WS/HAS. 


Basic C interpreter. 




language: Basic. 


Rembrandt 


Cassette filcspee: B. 


Article: Rembrandt Redux (p. 76). 


Disk filcspee: CTRAINER/BAS 


System: Model III. 48K RAM: Scries 1 




or Apparat editor/assembler. 


Hoops 


Screen dumps for graphics program. 


Article: Net Results (p. 52). 


I-anguage Assembly- 


System: Model 111 (Models 1 and 4 with 


Cassette lilcspccs: L1ST1 (src). 


changes). 32K RAM. 


LIST 2 (src). 


Basketball statistics program. 


Disk filcspecs: LIST 1 /SRC. LIST2/SRC. 


Language: Disk Basic. 




Cassette filespec: C. 


Page 


Disk filespec: HOOP/BAS. 


Article: Tidbit #30 (p. 83). 




System: Model 4. 64K RAM. 


Break In 


List files by line or screenful. 


Article: Interrupt Anytime (p. 66). 


Language: Basic. 


System: Model III. 48K RAM: Series 1 


Cassette filcspecs: I. PAGE (cmd). 


or Apparat editor/assembler. 


Disk filespecs: PAGE/BAS. PAGE/CMD. 


Interrupts for TRSDOS 1.3. 




Language: Assembly. 


Convert 


Cassette filcspecs: BRKAK (sre). 


Article: Project 80 (p. 84). 


BREAK1 (cmd). DEMO (cmd). SCROLL 


System: Mcxiel 4 (Models I and III with 


(src). SCROLL (cmd). 


changes). 32K RAM 


Disk lllespecs: BKKAKIN'SKC 


Converts object files to hex/ ASCII. 


BREAK1N/CMD. DEMO/CMD. 


Language: Basic 


SCROLL/SRC, SCROLL/CMD. 


Cassette filespec: J. 




Disk filespec CONVERT/HAS. 


Locator 




Article: The Right Address (p. 74). 


Squeeze 


System: Model 4/4P. 32K RAM. 


Article: The Next Step (p. 108). 


Locate TRSDOS 6. XX system 


System: Model 4. 64K RAM. 


addresses. 


Filter to condense debugged 


Language: Basic. 


programs. 


Cassette filespec: D. 


Cassette filespec: SQUEEZ (cmd). 


Disk filespec: LOCATOR/BAS. 


Disk filcspecs: SQUEEZE/SRC. 




SgWKEZE/FLT. ^ 


Windows 


Delete 


Article: Window Screens (p. 58). 


System: Models HI and 4. 48K RAM. 


System: Models 1 and III. LDOS 5. 1 . 


high-resolution board. 


A multiple file kill command for 


Graphics and a pie chart application. 


LDOS 5.1. 


Language: BasicG. 


("asset tr filcspee: DEL (cmd). 


Cassette filcspecs: E. F. G. H. 


Disk filcspee: DEL/CMD. 
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the mortal's largest publisher of computer-related information 
The group publishes 57 computer publications in 20 major 
countries Nine mfton people read one or more of the 
group's pubbcaMons each month. Members of the group in- 
clude Argentina s CornputerwortoVArgentina. Asia's The Asian 
Computerworld: Australia s Computerworld Austrata. Austra- 
lian PC World. Macworld and Oractonas. Brazil's DataNews 
and MicroMundo China's China Computerworld: Denmark's 
Compulerwortd/Oanmark PC World and flunfCcmrodorel. 
Finland's Mara. France's Le Monde Inlormjmoue. Golden (Ap- 
ple) and OPC (IBM), and Dttnbutique. Germany's Computer 
woche. Microcomputerwea PC We* SotlwareMartd. CW 
EditiorVSemnar Computer Business. Run and Apple's Italy's 
Computerworld Italia ana PC Magazine. Japan's Computer- 
world Japan. Mexico's ComputerworkVMetico and Compv 
Mundo. The Netherlands Computerworld BeneluM and PC 
WorU Benelux. Norway s Computerworld Njrge. PC WOULD 
and Run (Commodore) Saudi Arabia's Sam* Computerworld: 
Spam's Compij»en«ylaV€spana MicrowslemasvPC World. Com- 
modore World: Sweden's ComputerSweden Uikrodatom. and 
Svenska PC. the UK's Computer Management. Computer 
News. PC Busman World, and Computer Business Europe. 
Venezuela's Compulerworld Venezuela, the U S Computer- 
world. HOT CoCo. mC-der. IntoWorU. MacrVbrtd. Micro Market- 
world. PC World. Run. 73 Magazine. Focus Publications. On 
Communications, and 80 Micro 



Problems with Subscriptions Send a description of the prob- 
lem and your current and/or most recent address to 80 Micro. 
Subscription Department. P.O Box 961, Farmingdale. NY 
11737. 

Problems with Load 80 Circulation Address correspondence to 
Load BO. 80 Pine St . Peterborough. NH 03458 
Problems with Advertisers Send a description of the problem 
and your current address to 80 Micro. Rt 101 & Elm Street, Pe- 
terborough. NH 03458 ATTN.: Rita B Rhrard, Customer Service 
Manager. It urgent, call 1400-441-4403 

Change ol Address: Send old label or copy ot old address and 
new address to: 80 Micro. P.O Box 981. Farmingdale. NY 
1 1373 Please give eight weeKs advance notice 
Microiiim This publication Is available in microform from urn 
varsity Microfilms International. United States address 300 
North ZaeO Road. Dept P R . Ann Arbor, Ml 48106 Foreign ad 
dress 18 Bedford Row. Dept P R .. London, WC1R4EJ, Eng- 
land. 

Dealers Contact Ralno Wirein. Retail Sales Manager. SO Micro. 
Pine St , Peterborough. NH 03458 (800) 3430728 
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WHERE 

QUALITY PROGRAMS 

MEET COMPETITIVE PRICES 



2701-CW 15th»SUITF 61?»PLAN0 TX 75075»(214) 680 8268 



A FREE HOLIDAY GIFT FOR YOU 

During November and December we will in- 
clude a free copy of 80-Micro s 465 page 
review guide with every order. If your order 
is over S 100.00 you may pick one additional 
free gift from the following: Meltdown • The 
Rest of 80 250 page Book • Superkeys Mod 
II! • The Green Window CRT Screen • Var- 
keep & Screenpacker Plus • Master Direc- 
tory Mod III • Agri-Calc Feeder Pig Module • 



<ttr&r& 



*•"••' *»«££• 



IF YOU BOUGHT YOUR SOFTWARE ELSEWHERE, YOU'RE PROBABLY STILL WAITING 

Join the list of thousands of our satisfied customers who know that we ship 95% of our orders within 48 hours. If we are out of a product, 
we'll let you know when we can ship it and won't keep you waiting Our great prices complement our outstanding service. 

BOOKS, WALL CHARTS & MISC 



ELECTRIC WEBSTER 

WITH CORRECTING FEATURE 
LIST 149.95 SALE 129.95 

HYPHENATION OPTION 38 95 

GRAMMAR & STYLE 38 95 

TRS-80 I 'III/ 4 SPECIFY 



AND FOR MSDOS 

the incredible 

WEBSTER'S NEW WORLD 

SPELLING CHECKER 

ONLY $59.95 

Works with any ASCII type word processing die 
and incorporates Ml correcting features 



APPLICATIONS 

Macro Typing Tutor I/III/4 39.95 

ST-80 III 69.95 

Masterdirectory Mod III 29.95 

Superdlrectory Mod l/lll 44.95 

Datagraph l/lll/4/Max 69.50 

Datagraph Pie Chart Option 29.95 

The Basic Checkbook l/lll 64.95 

Mterm l/HI/4 59.50 

Loan Amortization III 29.95 

PowerMail Plus l/IH/4 94.95 

Text-Marge lor PowerMail 49.95 

PowerMail w.Text-Merge 124.95 

Inventory Control/ICS Pro 146.00 

Ultraterm l/lll 44.95 

Ultraterm 2.0 w/auto-logon 59.95 

Modem-80 l/lll 39.95 

Modem-80 4/4P 79.95 

SPS Statistical Analysis Mod I . . 150.00 
SPS aa above for Mod III Inquire 



WINDOWS ON MOD 4 

NOW PRONTO FROM MIS0SYS ALLOWS MODEL 
4 USERS TO CREATE AND USE WINDOW OVER 
LAYS ON THE MOO « SCREEN AT THE TOUCH OF 
A SINGLE KEY COMES COMPLETE WITH THE WIN- 
DOWING UTILITY, ROTATING INDEX FILE. AD- 
DRESS FILE. APPOINTMENT SCHEDULER. CAL- 
ENDAR 2 CALCULATORS CARD FILER NOTEPAD 
PHONE LIST & AUTO DIALER AND A MINI TER- 
MINAL A TRULY INCREDIBLE SOFTWARE SET FOR 
ONLY M.9S 

Requires 1 28K MOD 4 & TRSDOS 6 1 



SCHOOL UTILITY AND EDUCATIONAL 

Test Question Data Bank 49.95 

Test Generator. Drill 34.95 

Football Scouting 49.95 

Basketball Statistics 39.95 

Baseball Statistics 39.95 

Computer SAT 111-1000-1200 79.95 



HI RESOLUTION GRAPHICS 

THE GflAPHICS SOLUTION Sy Mcro jes SHIM 

Bu- th* txd hVRei Man) oe yew Mod a v 4MP far 
superior K Raoc Srwct « ooaid Hw oam mil co*n jp t ■>»» 
■tone C grapm appfcaient Gnpaa baac • nrAiM 
aura win 39 Mh*» Mi-Ret oamo> i ( 



uMMWd M m»ior oparaana tfmra *•» umonM 
and the Ht«*s scraan can to onmad on 20 poouu* (mart 

matalatcr a wpt w»i t capon Mama boarc ivflai <*i 
ll<*Pmort<nac*<*lMam*iiaimM*m»M, Tn« 
aoM • ne Ineat r*J*»j wawkaaon on *<a ■aartat anc a* 
dacma * «a» toftoaw • i alaCH Cat <o> lurmn daw 

SoaC'N Mod » lor* •"•>■ OnMnyq 
*« J2MR REDUCED TO J'W95 SALE tllt.M 

HI-RES SOFTWARE 

30 PLOT 39 95 

MA.THPLOT 39 9S 

8ASICE 39 95 
1$ 1 9 95 lo GBASHC 3 Owners) 

PCHAfl 24 95 

DRAW 39 95 

BIZGRAPH 98 00 

LET-S WRITE MUSIC 49 95 

■ T CAO 449 95 

SURFACE PLOT 39 95 

G I N A 75 00 

TOURNAMENT CHESS 49 95 

TOURNAMENT REVERSI 39 95 

JO TIC TAC TOE 29 95 



Using SuperUtility (new issue) 17.95 

Super Utility Tech Manual 3.x 13.95 

TRS-80/Z-80 Assembly Library . 31 .95 
TRS-80 Disk & Other Mysteries . . . 19.95 
The Custom TRS-80 & Other Myst 26.95 

Microsoft Basic Decoded 26.95 

Machine Language Disk I/O 26.95 

Basic Disk I/O A Other Myst 26.95 

How To Do It On The TRS-80 26.95 

TRSDOS 2 3 Decoded & Other Mys 26.95 

Basic Faster & Better 26.95 

TRSDOS 6/LDOS Programmers 

Guide 14.95 

Green Screens I/II/III/4/4P 16.95 

Diskettes SSOO 10 in Plastic Bx. . . 15.00 

Colored Sentinel Disks " 17.00 

Profile 3 • Commands Wall Chart' 4.00 
Visicalc Commands Wall Chart' .... 4.00 

Superscript! Wall Chart* 4.00 

Model III Basic Wall Chart' 4.00 

Model 4 Basic Wall Chart' 4.00 

Mod 4 by Jack (user guide) 9.95 

'Charts not shipped as separate order 



THE FBN GENERAL LEDGER 

Acsoluiei, trie driest G/L on the market MOD III 
RETAIL $300.00 NOW 149.95 



DATA BASES AND 
INFORMATION MANAGERS 

AUTO FILE MANAGER 

The newest entry in full fledged data 
bases is Powersoft's Auto File Manager 
(AFM) It incorporates total screen flex- 
ibility, form letter output, fully relational 
look up and custom report generation 
with mathematical functions This 
remarkable new product from the 
SuperUtility boys is priced at a low 
$99.95. Model l/lll 4/4P(lil Mode). 

INFOSCAN 
If you need a super fast screen oriented 
information manager with fixed windows 
and 1 second lookup by keyword, then 
this little iewel is for you Infoscan files 
can have different information in each 
record and each record can have it's own 
form Very simple !o use Mod l/lll or 
4/4P(lll Mode) $44 95 



WORD PROCESSORS & 

PRINTER DRIVERS 

Laiy Writer l/IH/4 119.95 

L«y Font l/IH/4 44.95 

M-Script l/IH/4 53.50 

LeScript l/IH/4/Max 104.95 

LeScrlpt MSDOS- 1000- 1200 179.95 

PowerDriver-E Epson l/IH/4 29.95 

PowerDrtver-P Prowrlter l/IH/4 .... 29.95 

PowerDriver-S Starwriter l/HI/4 29.95 

PowerDriverO Okidata 92 l/IH/4 29.95 

PowerDrlver-FX (FX/RX) l/IH/4 29.95 

Epson Driver Compiler .... . 29.95 
PowerScrlpt for Scrlpslt l/IH/4 34.95 



NOTE If your printer drl* 
have more 



> not luted, call 



TRS-80 ENCYCLOPEDIAS 

FULL 10 VOLUME SETS 

RETAIL SALE 

HardCover 199 50 79 99 

Soft Cover 109 50 39 99 

Get these collector's sets while quantities 
last 

A GREAT GIFT IDEA! 



MSDOS SOFTWARE 

Call us tor all ol your MSDOS software 
needs IBM PC TANDY 1200/1000 
Leading Edge PC. etc We have thou- 
sands of programs available at great 

prices 



I THE HOME ACCOUNTANT 
By Continental Sotware 



An Outstanding 
Financial Planner 



' Bk ' M : ttm . ..-v- ■ 



ONLY 
54.95 



SUPERDOS 

Over ' 5 enhancements to TRSDOS 1 

FAST/CMD 

Run TRSDOS 1 3 at the high speed 
m Mod 4/4P 



?9 95 



»i - 



i- ■ 



hanoies casn chaatboou credit car* tro a*B leta n i 
and awwaea • Urfmaaa amal Iraneacaoaa. ajctf ar eren- 
ow year • T'anaadona may Da %* amo n g Ma » « rt au0o» 
catoocmas • f legs transactions lor lax purpoaet • Matf*anw 
kamacBD* hawy • Prewjec Mtflaa grapnes *k any cate- 
gory by bar graph 

Tie program oat don just about envynng ion 3 as* ol i 
"paraonal tnanca pacmjga — Papula* Convuang. Nova**- 



M 



:■■ 



OPERATING SYSTEMS 

CP'M 2 2 Montezuma Mod 4 . ... 159.95 
R-Shack HD Driver for CP/M 2.2 30.00 

Monte s Window 49.00 

Monte s Toolkit 49.00 

Dosplus 4A With M-ZAL 114.95 

Dosplus 3.5 l/HI 54.95 

Multidos 1.71 l/lll 79.00 

Multidos 80/64 89.95 



MOD 4 BY JACK 

A complete re-write of the Mod 4 manual 
in English 1 Only $9.95 



UTILITIES 

J*M Memory Minder I 84.95 

J4M Memory Minder HI/4 74.95 

The Toolbox for LDOS 44.95 

LC Compiler EGAS l/lll or 4 124.95 

ALCOR C Complete System 83.95 

ALCOR Multi-Basic Compiler 83.95 

AOS Superkeys Key Macros Mod 11135.00 
6.2 Plus. (Enhance TRSDOS 6.2) . . 36.95 

The Tnolbelt Mod 4 44.9S 

AOS Utlls .1 Varkeep/Scrnpkr . 49.95 

Impakt for Basic l/lll 34.95 

Pro-Cess Mod 4 24.95 

Pro-Create Mod 4 74.9S 

Pro-Cure Mod 39.95 

Pro-Duce Mod 4 24 95 

Pro-Pads Mod 4 39.95 

Pro-LC Mod 4 124.95 

Pro-Zcat Mod 4 24.95 

Zues Editor/Assembler l/HI/4 74.95 

System Diagnostic l/IH/4 89.99 

Trashman 32.50 

Faster 22.95 

RPM 21.50 

DSMBLR III l/lll 24.95 

Accel 3/4 Basic Compiler l/lll 44.95 

Monitor 5 l/HI/4 22.95 

Hyperzap Disk Utility l/IH/4 49.95 

Z-Basic Compiler 3.0 79.50 

GRAPHICS AND GAMES 

Powerdraw l/lll 34.95 

Graphit (Line Graphing) 34.95 

AOS Utlls. Screenpacker Plus 49.95 

PowerDot II l/lll Spec. Printer 54.95 

Meltdown (Nuclear Powerplant) . 19.95 
Gamepak-3 (Funtace. Match, etc.) 29.95 



SUPERUTILITY 
PLUS 

By POWERSOFT 



VOTED AS THE OUTSTANDING 
UTILITY BY 80-MICRO READERS 



PROTECTED MEDIA 

BUY SUPERUTILITY PLUS 

3.2 FOR MOD l/lll 

OR 4/4P FOR MOO 4/4P 

AT $74 99 

AND RECEIVE THE NEW BOOK 

USING SUPERUTILITY PLUS 

FREE 

A $100.00 VALUE FOR ONLY $74.99 

SUPERUTILITY/PC NOW $84 95 



T/MAKER 

A complete word processor spelling 
checker, data base manager and spread- 
sheet with graphics Fully integrated Mod 
4/4P only 

Retail $299 00 
HOLIDAY SPECIAL ONLY $189.95 



BBS-80 ONLY 74.95 

A COMPLETE SYSTEM AT A FRACTION OF THE 
COS' OF SIMILAR SYSTEMS M00 1 OR IM SPECIFY 



TRSDOS-MSDOS-CPM 

HUGE SALE ON 
CONVERSION UTILITIES 



CONVERT BASIC 
SUPERCROSS/XT 
SUPERCROSS/XT 
W/CONVBASIC 
HYPERCROSS/XT 2 
HYPERCROSS/XT 1 8 



29 95 

90 00 

99 95 
90 00 
7995 

THESE UTILITIES ARE A MUST FOR 
CONVERTING TRSDOS TYPE PROGRAMS TO 
YOUR MSDOS OR CPM COMPUTER ALL 
MENU DRIVEN THEY DO THE COMPLETE 
CONVERSION ON YOUR TRS-80 MOD I 
NEEDS DOUBLE DENSITY 

Specify MOO 100 MOD III. MOD 4 



J%JskCount 



214-680-8268 



Monday Friday 10:00 to 8 00 CST 

Saturday 10:00 to 5.00 • Closed Wednesdays 

Send Cash. Check or Money Order. Please add S3. 00 for UPS Shipping 

or S4.00 for US Postage & Insurance. COD s send an additional 

$3.00 COD fee. All COD's will require cash or certified upon delivery. 

Foreign orders are welcome. All shipping charges assumed by purchaser. 

When ordering by mail, please specify computer model number. 

Phone Your Order In Today Or Mail To: 

DISKCOUNT DATA, 2701-C WEST 15th, SUITE 612, PLANO. TX 75075 



n nd 



IE 



Cheerfully Accepted 
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SIDE TRACKS / by Eric Maloncy 



Radio Shack: 
Smurfin' USA 



I'm spoiled. I'm so used to having doz- 
ens of computers at my disposal that 
I sometimes forget just how expensive 
they are. That's why I like to look 
through the Radio Shack sale fliers that 
occasionally come my way. They give 
me a new perspective on just how much 
a dollar really is these days. 

Most recently, the Fall Sale flier landed 
on my desk, and it's loaded with bar- 
gains. My favorite section is the where- 
is-as-is sale. This is two pages stuffed full 
of discontinued gizmos and gadgets that 
Radio Shack is trying to unload— porta- 
ble radios, telephones, walkie-talkies, 
and other electronic detritus. 

The stars of this particular spread are 
the Model 100 and Model 4. The Model 
100, placed at the top of the first left- 
hand page, is the main attraction— $299 
for the 8K model. "Buy now for Christ- 
mas Giving!" exhorts the copy. The 
Model 4 is right below, at $299 for the 
16K cassette version and $799 for 64K 
and two drives. 

Now, $799 is a pretty good price for a 
full-blown computer. But as part of the 
where-is-as-is sale, the Model 4 begins to 
look pricey. For the cost of a 64K system, 
I could buy 40 Trim-Fones ($19.95 
each). 114 cordless alarm clocks ($9.95 
each), or 161 Smurf radios ($4.94 each). 
One hundred and sixty-one Smurf ra- 
dios — now, there's something to think 
about. Having a computer in your home 
will scarcely get you a nod these days, but 
161 blue Smurfs in your living room will 
make you the talk of the neighborhood. 

The Model 4 and Model 100 aren't the 
only computer systems advertised in the 
flier. On the next-to-last page is the 
Tandy 1000 Personal Word Processing 
System— a Model 1000 with monitor, 
DMP-130 printer, DeskMate. and 
HomeworD word processor for $1,299. 
Overall, a pretty attractive deal. 

But wait. This is even more expensive 
than the Model 4. For the extra $500. I 
could buy 101 more Smurf radios, 
enough to fill the kitchen, the bathroom, 
and part of my study. 

OK, I don't really need 262 Smurf ra- 
dios. But the where-is-as-is pages are 
gorged with other goodies. In fact, 
$ 1 ,299 will buy one of almost every item 
there. The list is practically endless: 




Duofone talking home monitor 89.95 

ET-280 pulse phone 24.95 

ET-280 touch tone phone 29.95 

Duofone-332 phone dialer 29.95 

Trim-Fone wall phone 19.95 

TRC-84 CB walkie-talkie 14.95 

Wallet/purse alarm 3.49 

Door hanger alarm 4.95 

PC-2 printer/cassette interface 49.95 

PC-1 cassette interface 7.95 

PC-1 printer/cassette interface 29.95 

Wireless remote-controller 19.95 

Wireless alarm system 59.95 

Diskette storage box 14.95 

CGP- 1 1 5 color graphics printer 89 .95 

Cordless alarm clock 6.95 

EC-2001 desktop calculator 14.95 

1 6K Color Computer II 99.95 

MC- 10 16K RAM module 9.95 

PortaVision AM/FM/TV radio 24.95 

PocketVlsion LCD pocket TV 99.95 

Realistic STA-204 receiver 1 29 .95 

Burger King radio 6.47 

Smurf radio 4.94 

Chronomatic clock radio 32.95 

SCR- 1 5 cassette recorder 79.95 

Personal AM/FM stereo 2 1 .95 

Slim-Line pocket radio 6.95 

CTR-51 desktop recorder 39.95 

SCP- 1 4 stereo cassette portable 34.95 

Semiautomatic car antenna 22.95 

Door-mount car speakers 19.95 

Science-Fair digital computer kit 9.95 

Science-Fair AM/FM radio kit 8.95 

Video enhancer/stabilizer 59.95 

AM/FM stereo portable radio 37.95 

Super-Copter toy 12.95 

3-D Sky Duel game 9.95 
Total 1,288.15 

True. I don't need three phones, three 
cassette recorders, or eight radios. I'd be 
hard put to find much use for the MC- 10 



RAM module or Pocket Computer inter- 
faces. But, what the heck, Christmas is 
coming up. Now's the time to give my 
mother that semiautomatic car antenna 
she's always wanted. 

What the Radio Shack fliers ultimately 
prove is that we Americans can be per- 
fectly happy with the simple pleasures 
of life, whether they be a $12.95 pair of 
fold-up headphones or a $6.88 Solar En- 
ergy Project Set that's a "great gift for 
kids 8 to 88." We owe a debt to Tandy for 
offering us such simple, low-cost alter- 
natives to megabuck computing. 

Trivia Time 

One of CompuServe's TRS-80 special- 
interest groups recently produced an im- 
pressive thread devoted entirely to tech- 
nical trivia of the TRS-80's early days. 
Here's a sampling: You'll find the answers 
on p. 82. If you get more than half, you 
can consider yourself a genuine old-timer. 

1. Which system had only three error 
messages, and what were they? 

2. You typed in SYSTEM and then fol- 
lowed the •? command with / 12345 to 
do what? 

3. What was the real update password 
on the TRSDOS 2. 1 SYS files? 

4. Finish this sentence: "Joe, you r — 
b- — !" (Hint: this sentence was found in 
unlikely places on the first release of 
TRSDOS 1.3 disks.) 

5. TRSDOS 2.2 and 2.3 included two 
programs called TEST1/CMD and 
TEST2/BAS. TEST1/CMD was a mem- 
ory test program. TEST2/BAS was sup- 
posedly a "disk stress test program." In 
reality. TEST2/BAS was what Radio 
Shack program doctored up to look like 
it was actually doing something? 

6. What did the initials of IJG. now-de- 
funct publisher of the ". . .Other Myster- 
ies" books, stand for? 

7. Which DOS would not allow a Basic 
program to access a random file with a 
different LRL than that used to create 
the file? 

8. Vern Hester wrote a DOS for the Model 1 
that never became popular. What was it? 

9. Level I Basic had only two string vari- 
ables. They were fixed length. What 
were they and how many characters 
could they hold? 

10. What was Level III Basic? ■ 
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DOTWRITER printed these on an Epson MX-80. 




Circle 91 on Reader Service card. 



See What You Can D o With 
DOTWRTEEBJ 



DOTWRITER lets you create spec- 
tacular, eye-catching signs, invi- 
tations, letterheads, large sideways 
banners, catalogs, or even books. It is 
just what you need to turn your dot- 
matrix printer into a versatile typeset- 
ting machine. And it is available for 
your TRS-80 Model 4/4P (yes, in native 
mode), as well as for the Models I and 
III. 

WHAT IS DOTWRITER? 

DOTWRITER uses the "bit-image" 
graphics oi your printer to pro- 
duce the kinds of stunning results 
shown inside the box. It is a full-func- 
tion text printing program, so you can 
inter-mix different character sets, do 
centering, paragraphs, pagination, 
magnification, draw horizontal and 
vertical lines, reversals (black on 
white), and even print right-justified 
proportional text. 

DOTWRITER includes the printing 
program, complete documentation, 
and fourteen useful typefaces (60 to 90 
characters per typeface). We will in- 
clude the 170-page Letterset Reference 
summary at half-price ($10.00) with 
your order. 

To use DOTWRITER, just write your 
text with any popular TRS-80 Word 
Processor (such as ALLWRITE or 



and DOTWRITER 
will do the rest. 




SuperScripsit), add the necessary for- 
matting commands, s^=9t*^ 

36 more letter- ^-(readers' choice"^ 
set disks are ^^XnTEF^*^ 
available separate- 
ly. Each has 3-12 
complete typefaces. 
The disks costs less 
than $25 each and 
you may purchase them at any time. 

SIDEWAYS 
SPREADSHEETS 

If your VisiCalc spreadsheets are too 
wide for your printer, our "LONG- 
VIEW" option may be just what you 
need. It is an add-on that turns spread- 
sheets sideways so that DOTWRITER 
can print them down the page instead 
of across. LONGVIEW comes with 
three additional fonts. 

EQUIPMENT 
REQUIREMENTS 

DOTWRITER needs a TRS-80 1. III. 4 or 4P with 2 
disk drives and 48K ol memory. Separate versions 
ol DOTWRITER support EPSON MX-80 with Graf- 
trax. MX- 100 with Graftrax-Plus. and FX. IX. RX; 
C.ITOH 8510/1550; MICROLINE84-2'92'93; RADIO 
SHACK DMP 110-2100/CGP-220; GEMINI 10X 15X 
and other STAR printers. 



We printed our samples on an Epson, sizes may 
vary on other printers. Many of the lonts shown 
above are available at extra cost. 

Send for free print samples! We've 
only shown you a few of the 240 
DOTWRITER fonts. For the best in TRS- 
80 graphics printing, we suggest you 
order DOTWRITER today, toll-free. 



Please specify Printer and 
Computer when ordering. 

DOTWRITER $99.95 

LONGVIEW 29.95 

Additional Letterset 

disks (3- 12 fonts/disk) 24.95 
3 for 49.95 
Letterset Reference 

Book 20.00 

FREE bonus disk with two 
Banner fonts when you order 
DOTWRITER! 



ORDER NOW, TOLL-FREE 
(800) 824-7888, oper. 422 

Dept. C. Box 560. No. Hollywood. CA 91603 
(818) 764-3131 Information and Same Day Processing 

TERMS VISA. MC. checks. COD. Please add $3.00 
shipping in U.S. or Canada Sales tax in 
CA Most orders tilled within one day. 




The Premier Word Processor for 
Your TRS-80 Model I, III, or 4 




We are proud to offer 
you the one Word 
Processor that will 
satisfy all your 
writing needs: ALLWRITE. It 
sets new standards for text 
editing and printing, and will 
give new life to your TRS-80. Let 
us tell you why . . . 

In an attempt to push the public 
into expensive 16-bit computers, many 
manufacturers have been saying that 
the TRS-80 is obsolete. The truth is that 
the software, not the hardware, makes 
the difference. And the best word proc- 
essor of all is now available oniy on 
the humble TRS-80, not on those ex- 
pensive 16-bit machines! 

ALLWRITE will save you time and 
let you produce the highest-qual- 
ity, most professional-looking letters, 
term papers, and reports available on 
a micro-computer. 

Allwrite Can Save You Time! 

Reads a 25,000 character file (10 
printed pages) from disk in SIX SEC- 
ONDS . . . does a global search-and- 
replace in FOUR SECONDS . . . outruns 
even the fastest popular micro-printer. 



ALLWRITE'S Screen 

Handling Makes Word 

Processing Easier Than Ever 

Change text width at any time; 
wide lines shift left and right as you 
type. ALLWRITE preserves double- 
blanks between sentences, uses the 
entire screen for text, and displays a 
complete Status Screen at the touch of 
a key. Scroll by line, partial screen, 
full screen, to top or end of file, or to 
any marked point. Move cursor by 
character, word, tab. line, or screen. 

You can set and change on-screen 
tabs and store them on disk. The 
print-time tabbing features are in- 
credibly versatile: they allow left, 
right, and centered tabs, and even line 
up your decimal points. 

ALLWRITE shows you 
where you forgot to turn off 
underlining, boldface, 
italics, or double-width. 
Special on-screen Preview 
feature shows page breaks 
and page layouts ... in- 
cluding underlining and 
boldface. In "Summary" 
mode, ALLWRITE quickly 
flags formatting errors 



These were printed by ALLWRITE: 
shown 20% actual size. 

without wasting time printing all the 
text. These standard features make 
document preparation faster and 
easier than ever! 

State-Of-The-Art 
File Handling 

There is no upper-limit on docu- 
ment size with ALLWRITE, because it 
chains files backwards as well as for- 
wards, even across diskettes. Switch 
from one chained file to another in less 
than six seconds by pressing two keys. 
Select portions of other files for inclu- 
sion at print time . . . great for stock 
paragraphs. 

ALLWRITE salvages text from bad 
disks! If a sector goes bad, you 
won't lose the entire file, because it 



TAKES FULL ADVANTAGE OF YOUR 
MODEL 4. 

The model 4 version of ALLWRITE uses 
the entire 80-by-24 screen. On a 64K ma- 
chine, you can edit over 34,000 charac- 
ters of text. On a 128K machine, you can edit 
THREE FILES AT THE SAME TIME! The 
second and third files can be over 32,600 char- 
acters each, for a total of almost 100.000 
characters of text in memory. 



will skip bad sectors, read the rest of 
the file, and then show you where the 
lost text belongs. This advanced error 
recovery turns a disaster into a feeling 
of profound relief. 

User-Definable Soft Keys 
Reduce Typing Time 

You can store 22 phrases or com- 
mands at a time into "soft-keys." then 
press just two keys to retrieve them. 
This makes frequently-used phrases 
and formatting controls a snap to use. 
You can store these definitions on disk 
and build a library of hundreds of pre- 
programmed keys to fit every one of 
your applications. 

Our specially-designed templates 
fit right on your keyboard to let 
you see your settings at all times. 
Each template is also a Reference 
("Cue") Card, so it is always right in 
front of you when you need it, without 
using up valuable screen space. 

ALLWRITE Is Easy To Learn 

ALLWRITE's commands and con- 
trol keys are easy to remember be- 
cause they use the first letters of com- 
mon English words: 'CE' stands for 
'Center,' Search' and 'Replace' do just 
that, and so forth. The on-line HELP 
menu offers over fifty screens of topics. 

ALLWRITE's superb documenta- 
tion will get you started quickly. Por- 
tions of it are designed for beginners, 
with every feature clearly explained 
in step-by-step tutorial style. Since 
you won't always be a beginner, other 
parts of the book offer advanced top- 
ics. There is a cross-reference summary 
chapter, a 14-page comprehensive in- 
dex, and a detailed Table of Contents. 
We've been developing computer pro- 
grams and manuals for over 23 years, 
and understand the importance of 
good documentation. 

ALLWRITE works with all major 
DOS's on Models 1, 3, and 4/4P. 

PROSOFT'S On-Going 
Customer Support 

Perhaps the best reason of all for 
having ALLWRITE is the continuing 
support we offer you: friendly, expert, 
direct support that is unsurpassed in 
the micro-computer industry. 

Note to students: with its Footnote. 
Table of Contents and Index features. 
ALLWRITE is ideal for your reports and 
Term papers. 

Note to teachers: ALLWRITE makes 
it very easy to generate multiple- 
choice exams and answer keys. Ask 
for free instructions when ordering. 



"ALLWRITE is a profession- 
al system that sets a new 
standard in word proces- 
ing. It's powerful and easy 
to learn and use." 

80 MICRO. Nov., 1984 



Customer Comments 

"This is the best software package I 
have ever received . . . superb, easy to 
use. last, and has more features than 
the business word-processor at the 
office." (E.R.L.) 

"Your company and products have to 
be one of the strongest factors I can 
think of lor keeping me with the 
TRS-80!" (J.R.H.) 

"NEWSCRIPT is the Cadillac of word 
processors. ALLWRITE is the Mercedes 
BenzU" (B.E.) 

"... a very readable manual." (D.S.) 



BENEFITS OF OWNING 
* • ALLWRITE * • 



// Word Processing is important to 
you. PROSOFT's ALLWRITE is the best 
choice you can make. The clean, pro- 
fessional appearance it adds to your 
letters and reports will make an excel- 
lent impression on people. We will be 
happy to send you free print samples 
so that you can see for yourself how 
good ALLWRITE will make you look. 

You probably know that quality 
word processors for CP/M and the 
IBM-PC sell for $300-500. and they 
don't have ALLWRITE's capabilities or 
speed ... or PROSOFT's proven, on- 
going support. Now, for a fraction of 
the cost of a new computer, you can 
have the most complete word proces- 
sor of all. And you won't have the 
headaches of starting all over again 
with a new, different computer. 



HUNDREDS OF USEFUL 
CAPABILITIES 

ALLWRITE comes with just about 
every useful word processing feature 
...standard. Here are some high- 
lights: excellent right-justified pro- 
portional printing on most printers 
having that ability; powerful Form Let- 
ter and Mailing Label preparation; In- 
stant counts of words, characters, 
lines, changes; block Move, Copy, De- 
lete, Putfile. Getfile, and List; delete 
by character, word, line, sentence, 
paragraph, or block; insert and one- 
key insert; great RS-232 printer sup- 
port; accepts all 256 ASCII codes from 
keyboard; intermix pitches on same 
line (printer-dependent); 1.5 line spac- 
ing, 6, 7 8, 12 lines per inch (printer- 
dependent); does multiple-columns on 
all printers; perfect alignment of hang- 
ing indents; variables, logic state- 
ments, conditional printing; wildcard 
Directories; integrated with Electric 
Webster and DOTWRITER for Models I. 
III. and 4 (these are sold separately); 
"Legal" line numbering; paragraph, 
list, and figure numbering; supports 
most popular printers (all "printer dnv 
ers" included); compatible with high- 
memory drivers; fully explains all 
DOS and ALLWRITE error messages; 
wildcard search-replace; tabs, search- 
replace, other settings remembered 
across files; word reversal; up to nine 
levels of boldface; flexible page titles; 
footnotes at bottom of page or end of 
document; Table of Contents and In- 
dex generation; and PROSOFT's un- 
matched text formatting and printing 
capabilities. 



How To Order 

You can order by phone or mail. For 
quickest delivery, call our Technical 
Support line. Please specify your TRS- 
80 model (I, III. or 4, 48K, at least two 
disk drives), and your printer(s). Our 
price includes normal shipping in the 
U.S. and Canada. The sooner you or- 
der, the sooner you will begin to bene- 
fit from the ALLWRITE! Word Processor. 

Allwrite for the TRS-80 

$199.95 

Circle 30 on Reader Service card. 



ORDER NOW, TOLL-FREE 

(800) 824-7888, oper. 422 








£ 



Box 560, No. Hollywood. CA 91603 
(818) 764-3131 for Technical Information and Same-Day Processing. 

Terms: VISA. MasterCard, checks. C.O.D. California residents please 
add sales tax. Most orders filled within one day. 
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Writer's Block Letters 

I agree with Eric Maloney (Side 
Tracks. August 1985, p. 8): Word proces- 
sors do not improve writing. I always 
used to write quickly and easily with a 
pen or typewriter, but Scripsit brought 
about writer's block. All those editing 
commands intimidated me while I was 
writing a first draft; I spent too much 
time tinkering and too little time writing. 

Now I use Delmer D. Hinrichs' Basic 
Word Processor ("The Return of Hin- 
richs' Word Processor." March 1984. p. 
100) almost exclusively. It has many ed- 
iting commands, but they're off in the 
edit mode, where they should be. While 
I'm writing. I have one editing command 
at my disposal — the backspace. And 
that, too. Is how it should be. 

80 Micro has published several differ- 
ent versions of Hinrichs' program. The 
one I use appeared in the January 1983 
issue (p. 200). If you use it in conjunction 
with Mark Goodwin's type-ahead utility 
("Getting Ahead," July 1985, p. 65), 
you'll find keyboard response excellent. 
And since Hinrichs wrote his program in 
Basic, you can easily modify it to suit 
your needs. 

Mark Allen Reed 
West Lebanon, NH 

I'm delighted that Eric Maloney plans 
to return to his manual typewriter since 
he seems to have a need to indulge him- 
self In some kind of language orgy. Also, 
since he says he has to struggle to ex- 
press himself with a word processor, he 
should stop using one. However, what he 
believes is true for him clearly is not true 
for most of the rest of us. That word pro- 
cessors don't improve writing for most 
people is absurd. 

The notion that word processors can 
liberate creative writing by removing 
most of the restrictions imposed by the 
pencil or typewriter is completely accu- 
rate in the view of many people who are 
much more productive after using a 
word processor. 

Anyone experienced with word pro- 
cessors knows that they do not supply 
creativity to writers who have none, but 
they do make writing creatively much 
easier and more efficient than any other 
method known. 

Murlon H. Dye 
Commerce, TX 




Eric Maloney's observation about 
word processors is quite accurate. One 
should also note that a word processor 
will not directly improve a writer's style 
if he lacks it. Word processors do make 
rewriting and editing a breeze, espe- 
cially with large amounts of copy, but 
they're no substitute for a command of 
the language, punctuation, ability, and 
innovation. 

I disagree, however, that they can in- 
jure writing skills. The person pushing 
the pencil or tapping the keys will deter- 
mine the worth of the creation. If Maloney 
finds he's more creative with an ordinary 
typewriter than with a word processor, 
perhaps he's suffering from a case of cur- 
sor-bllnksis-anxiety, a recently discov- 
ered emotional disorder brought about by 
the eternal, unrelenting blink of screen 
cursor that reaches into a person's sub- 
conscious with the hidden message. 
"Come on! Come on! What's the next 
word! sentence! paragraph!" 

Jim Merllnl 
Montgomery, AL 

My cursor likes to hum old Smokey 
Robinson tunes. 

—E.M. 



80 Micros BBS is open 24 hours a 
day. It oilers programs you can up- 
and download, special-interest 
groups, and a classified section. You 
can reach the board at 603-924-6985; 
UART settings are 300/1200 baud. 8- 
bit words, 1 stop bit. no parity. 



Basic Solution 

In your August 1985 issue you ran ar- 
ticles on Model 4 Basic (p. 38) and GW- 
Basic (p. 46). Both articles touted the use 
of the Common and Chain statements to 
link Basic programs. In practice. I've 
found both statements useless. The 
problem is that you have to save the pro- 
grams you want to chain in ASCII for- 
mat. If a program Is so long that you 
have to separate it into smaller pro- 
grams, the individual modules take so 
long to load as to be impractical. 

I think it's faster to save the programs 
in compressed form and save to a disk 
file the variables you want to pass. Then 
the succeeding program, linked to the 
first one by a Run statement, can reload 
the variables. 

For even greater speed, you can save 
the variables to a RAM disk. The varia- 
ble-passing routines found in Lewis Ro- 
senfelder's Basic Faster and Better 
work well in Model III mode on a Model 
4, but they won't work with Model 4 Ba- 
sic or GW-Basic. 

William D. Tabor Jr. 
Thlbodaux, LA 

Window-Comments 

Thank you for the favorable review of 
our product, Window-Comm (November 
1985. p. 31). One thing the review 
didn't mention was that Pacific Software 
Consultants offers a $10 rebate to each 
customer who persuades a friend to buy 
the product (limit one per purchased 
copy), making Window-Comm an excep- 
tional value at $8.95 after the rebate. A 
friend sold on it need only include the 
software license number of the original 
purchaser along with his order and we'll 
send the latter a $10 rebate check. 

The other thing you should know is 
that, while Window-Comm had been run- 
ning on the Model HI, we released a Model 
4 version in October 1985. It offers several 
enhancements. All Model 4 owners who 
bought the Model HI version will receive 
the Model 4 version free of charge. 

Stephen W. Apple 

Pacific Software Consultants 

San Luis Rey, CA 

Send your correspondence to Input, 
80 Micro, 80 Pine St., Peterborough, NH 
03458. 
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The ALPHA SPEECH SYNTHESIZER 

49 



Outstanding performance and value for only: $ 

This is your chance to experience the power and pleasure that speech 
adds to your TRS-80. If you could read the thousands of testimonials we 
have received you would be convinced Instead, our unconditional 1 5-day 
money back guarantee fully protects you. 
Watch your friends faces when your TRS-80 starts talking. 



Thousands sold at $75.90 

•When purchased with text 
to speech software 




TALKER 4.0 



Unlimited vocabulary Text-to-Speech Software. 
Powerful, yet easy to use; even non-programmers can 
enjoy it. Talker 4.0 features: 

• Automatic video and/or keyboard echo (if you want it). 

• Pitch control • Voice-speed control • Spelling mode 

• Says numbers (up to 999 trillion) • Simple BASIC 
commands • Much more! Only $39.95 



Small Print: Hardware Power supply, speaker and manual included. Model I unit plugs into keyboard 
or expansion interface 40 pin bus Model III.4.4P unit plugs into 50 pin I/O bus. Model 4P needs short 50 pin 
extension cable $ 1 4.95. Use our "Y cable" (see next page) if your bus is already used. Software Works with 
all DOSes (not CPM), is 6.2 K long, and relocates itself to the top of available memory. Manual available for $5. 



Dr. SIGMUND 

Artificial Intelligence atwork! 

If you want to show off your 
computer, run "Dr. SIGMUND" 
and see their expressions as 
your TRS-80 has an intelligent 
conversation with you. Even 
you will be impressed! 



PERSONALITY TEST 

By Dr. James E. Hord, Jr. for 

your ultimate entertainment. 
This elaborate personality test 
will amaze you, and puzzle your 
friends. Besides talking to you, 
it will print a painfully accurate 
report. 



TALKING 
WORD PROCESSOR 

By George McCoy of Rehab 
Research. The Alpha Speech 
Synthesizer was chosen for this 
functional word processor with 
full speech capability. A perfect 
example of computer speech. 



a 



Each of these three programs require 48K and are available on disk only. The Alpha 
Speech synthesizer is required for speech. Each program is only $29.95 

SPECIAL: ALL THREE FOR ONLY $59.95 



NEWCLOCK 



Model I $39.95 
Model 111,4 $59.95 



The right time at the right price! Keep the time and date with quartz accuracy, even 
when your computer is off. The backup lithium battery (included) will last for over 2 years. 
Software on tape or disk, please specify. Use "TIMESET' once to set the clock. Use 
"SETCLK" to set your computer's internal clock (at power up) or use "TSTRING" so that the 
"TIMES" function reads the Newclock. 

Connection: Model I plugs into the keyboard or expansion interface Model I II. 4, 4P: plugs into the 50-pin I/O 
bus. 4P needs short 50-pin extension cable S 14.95 Compatible with all operating systems 
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ALPHA [Puxe 

79-04 Jamaica Ave., Woodhaven, NY 11421 



800-221 -091 6 

Orders Only. NY& info call 

(718)2965916 
Hours: 9-5 Eastern Time 



Add S3 OO per order tor shipping. 
We mcc.pt Vlt.. MC. checks. M.O. 
C.O.D. add S3. 00 extra, "jam 

N. Y. rntidents mdd sales fax »i^— 
Shipping to Canada it SS.OO am 
Overseas. FPO. APO add 10*b *■* 



FEEDBACK LOOP / by Terry Kepner 



Send your questions or problems 
dealing with any area of Tandy/Radio 
Shack microcomputing to Feedback 
Loop. 80 Micro. 80 Pine St.. Peterbor- 
ough. NH 03458. 

9 m Thank you for including the kind 
•remarks concerning TBase. my 
subroutines for recording data on cas- 
sette-based TRS-80 computers (July 
1985, p. 17). Unfortunately. I have re- 
ceived a letter from Bruce 0*Connor, a 
lawyer in Seattle. WA. who complains 
that my program name is too similar to 
a trademark of his client's. Traveling 
Software Inc. I have thus renamed my 
product Tapestry, and am including a 
copy of O'Connor's letter in the manual 
distributed with each copy of my work. 
(David B. Dillon. Derwood. MD) 

A^For those who missed Dillon's let- 
• ter in the July 1985 Feedback 
Loop, he has developed a set of 19 Assem- 
bly-language routines that let Model III 
Basic maintain a cassette-based data file 
much the same way that Disk Basic main- 
tains a random-access ASCII file. For more 
information, contact Dillon at 16533 Bae- 
derwood Lane, Derwood, MD 20855. 

9«In the July 1985 Feedback Loop 
•(p. 16). Ralph Turner asked for 
help in using cassette Scripsit 3. 1 with 
his DMP-200 printer. I think I have a 
patch he could use. It isn't particularly 
elegant, but it gets the job done with a 
minimum of trouble. 

My patch occupies Scripsit's title area, 
so that it steals no memory from your 
text. I used a method suggested by Arne 
Rohde's VCMOD utility (April 1983. p. 
210). It lets you send control codes to 
your printer by intercepting every less- 
than sign it encounters and Anding the 
ASCII value of the following character 
with 31. (In other words, the program 
keeps subtracting 32 from the ASCII 
value until the result is itself below 32.) 
Using this method, you can send the es- 
cape character (CHR$(27)) to the printer 
by embedding <: or <( into the text; the 
BEL character (CHR$(7)) by embedding 
< ', < G. or < q; and so on. 

In addition, if you want to print char- 
acters with ASCII values above 127, sim- 
ply embed a greater-than sign in the 
text, followed by the character with an 
ASCII value of 128 less than that of the 




character you want to print. To print 
CHR$(240). embed >"; to print 
CHR$(191). embed >?: and so on. 

Keep in mind that the less-than and 
greater-than signs foul up Scripsit's jus- 
tification routines. I'd suggest setting 
J = N at the beginning of your document. 
And don't be frightened by the mention 
of Anding ASCII values— with your 
printer's ASCII code charts nearby, and 
a half-hour or so of practice, you'll soon 
get the hang of it. 

Use a high-memory monitor (or 



EDTASM) to enter this program into 
memory after you load Scripsit, then 
transfer control to Scripsit's entry ad- 
dress, 4303 hexadecimal (hex). In addi- 
tion, change memory locations EEF hex 
and 4EF7 hex from CD 3B 00 to CD BD 
48. Be sure to change these addresses 
before transferring control to Scripsit. 
This final alteration installs the patch. 
(Mark Reed, West Lebanon, NH) 

Al Thank you for sending in your 
• Scripsit patch (see the Program 
Listing). 

9* I have a Level II 16K Model I. and 
• I have just upgraded to a Model 
4P. I want to transfer all my old pro- 
grams to my new computer. Here in 
Chile some special chips (Signetics 
2681) are not available and it is not easy 
to build an RS-232 interface for my 
Model I. I found Bob Hart's article "Bare 
Bones Communicator" in the June/July 
1982 issue of 80 Micro (p. 128). I built 
the circuit and it worked. . .in one way. I 
can transfer Basic programs from the 
Model I to Model 4P but the Model I 
doesn't acknowledge Model 4P signals. I 
suspect the XRX modification in my old 
machine is the problem. I have read 
about that mod. but I don't know what 





Program Listing. A Scripsit patch program. 




; Hand 


Assembly 


of "Patch" 














; written by Mark Allen 


Reed 


tor 


Model III cassette 




; 


Scripsit 


r version 3.. 














; assembled 


to begin at 


locat 


ion 


48BDH, 


Scripsit's 




; 


title area 














PATCH 


PUSH 


AF 






F5 










LD 


A, (FLAG) 






3 A 


E7 


48 






OR 


A 






B7 










JR 


NZ, NEWPRT 






20 


11 








POP 


AF 






Fl 










CP 


'<■ 






FE 


3C 








JR 


Z , SAVFLG 






28 


08 








CP 


■>• 






FE 


3E 








JR 


Z , SAVFLG 






28 


04 






LOOP 


CALL 
XOR 


003BH 
A 






CD 

AF 


JB 


00 




SAVFLG 


LD 
RET 


(FLAG) ,A 






32 
C9 


E7 


48 




NEWPRT 


CP 

JR 

POP 

AND 

JR 


NZ, GRAPHC 

AF 

1FH 

LOOP 






FE 
20 
Fl 
E6 
18 


3C 
05 

IF 
EF 






GRAPHC 


CP 
JR 
POP 

OR 
JR 


•>' 

NZ,L00P 
AF 
80H 
LOOP 






FE 
20 
Fl 
F6 
16 


3E 

EB 

80 
E6 






FLAG 


DBPB 









00 






End 
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The Amazing A-BUS 

Hobbyists, Engineers, Scientists, OEMs, 
universities, the A-BUS is for you! 

What is the A-BUS? The A-BUS is the best way to connect a variety of Input and 
Output cards (such as analog converters, relays, sensors, motor controllers, etc.) to 
your computer. 

A typical A-BUS system consists of: • An adapter card and cable to connect your 
computer to the A-BUS standard •The A-BUS motherboard, with several slots in 
which you plug the different Input and Output cards. • Your choice of cards listed 
below, depending on your application. (Many more cards will be released soon.) 

The "A" stands for Amazing, and here is why: 

OThe A-BUS works with any TRS-80 models I, III, 4, 4P, 4D, 1 000, even 1 00. 200 

andCoCo. Inaddition, it will also work with IBM or Apple computers. Should you ever 

move to another system, your investment is protected. Only the low cost adapter 

card has to be changed ! 

©The system is expandable to meet current and future needs easily. 

©Low cost and reliability will ensure your project success. 

A-BUS Adapter for Model I Plugs into 40-pin I/O card edge (on KB or E/l) AR-131...S39 

A-BUS Adapter for Models 3.4.4P.4D Plugs into 50-pin I/O bus. AR-1 32. ..$49 

Cable (3 ft.) Computer to A-BUS CA-1 63. ..$29 

A-BUS Motherboard, for up to 5 cards (not needed if using only one card) MB-1 20.. .$99 

A-BUS |I© W Relay Card: RE-140...$129 

This industrial grade output card includes 8 relays. (Contact rated 2 Amp @ 1 25V) All 
the decoding necessary is included which means that you can connect up to 64 cards 
(which is 51 2 relays.) Easily controlled using "OUT' commands. For example OUT 0,0 
turns all the relays off on card #0. Eight LED's show the states of the relays. 



new, 



A-BUS nonisolated Input Card: IN-141 ...$49 

This optically isolated input card makes it safe and easy to connect external devices 

(switches, sensors, thermostats, keypads) to your computer. Simple INP commands read 
the status of the eight inputs. Full address decoding allows up to 64 input cards (that's 51 2 
channels) per computer. 



ne", 



A-BUS H^ w " Analog Input card: AD-142...$1 19 

8 channel 8 bit Analog to Digital converter. Your computer can read voltages, 
temperatures, pressures, light levels, etc. • Input range: to 5.1 Volts. •Resolution: 
20mV. • Conversion time: 1 20 microseconds. In BASIC, you can take up to 1 00 readings 
per second. • Port address: selectable. Up to 64 Analog-80's can be connected to your 
computer for a total of 51 2 channels ! 



new, 



A-BUS P^ ww Dual Stepper Controller: ST-143...S69 

Don't be afraid of stepper motors anymore. The special package (below) includes 
everything you need to get familiar with steppers: • Controller card drives 2 steppers 
(1 2V bidirectional) ST-1 43. ..$69 • Stepper: 48 steps per revolution, up to 300 steps/ 
second. MO-1 03. ..$15 • Power supply PS-1 26. ..$10 
Special Package: Controller, two steppers and power supply: PA-1 81 $99 

Disk drive extender cable (8"). ..C160:$9. 95 Special Cables 

Y-Cable for Mod I bus (40 pin): •X2-40...$29 »X3-40 .$44 • X4...$59 • X5..$74 
Y-Cable for Mod 3 & 4 bus (50-pin): • X2-50...$34 •X3-50...$49 •X4-50...$64 
Disk drive cable (34 pin): •2-drive...C162:$32 •4-drive...C163:$45 
Our cables are made with high quality gold plated connectors to ensure utmost reliability 



Green Screen $12.50 

Do your eyes a favor, put on a green screen. 
Tens of thousands are in use because they 
work. Contrast is enhanced and eye fatigue 
is greatly reduced. Our green screen is 
curved; it fits right on the face of the tube. 
(Fits Models 1,11,111.4,12.16) 



Printer- Switcher $59 

A must if you have two printers, plotters, 
or any devices using the standard parallel 
printer port. End the hassle of plugging 
and unplugging cables. You can select 
either device at the flick of a switch. For 
Models I.III.4.4P.4D. 
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ALPHA 

79-04 Jamaica Ave., Woodhaven. NY 11421 



800-221 0916 

Orders Only. NY & info call 

1718)296-5916 
Hours: 9-5 Eastern Time 

Circle 17 on Reader Service card. 



Add S3 00 per order lor shipping 
We accept Visa. MC checks M O 
COO add S3 OO extra maaam 

N Y residents add sales tan. iw " 1 * 
Shipping to Canada is SS OO aaal 
Overseas FPO. APO add 10** *" 



FEEDBACK LOOP 



it is. My model I has the serial number 
058836 and two NEC ROM chips 
(8043364 and 8043732); the initial 
prompt is "Memory size?" Can it have 
the XRX modification? If it has, how can 
I disable it momentarily? (Jorge Herrera 
Endesa, Los Angeles, Chile) 

A. Before you start looking at the 
• XRX modification, alter the DB- 
25 connector you're using by tying lines 
6, 8, and 20 together. The problem may 
be that the Model 4P is waiting for your 
Model I to transmit a Clear-to-send or 
Data Terminal Ready signal. Because 
the bare-bones communicator doesn't 
have those lines attached to anything, 
the Model 4P thinks the Model I isn't 
ready to receive, so it sends nothing. 

Next, the XRX-III modification im- 
proves the reliability of the cassette file- 
loading procedure by making allow- 
ances for the low-quality cassette units 
and tapes on the market. It does, how- 
ever, mean you can't use the cassette 
port at speeds other than 500 baud. If 
you have the XRX modification installed, 
and tying lines 6. 8. and 20 together 
doesn't help your RS-232 communica- 
tions, then you must disable the XRX-m 
modification. 

Information about the XRX-III modifi- 
cation and the standard TRS-80 cassette 
circuitry is available in Dennis Kitsz's 
book The Custom TRS-80 & Other Mys- 
teries. This book is currently available 
from Montezuma Micro, an 80 Micro 
advertiser. 

9*1 bought a Model 4P and haven't 
• been able to find programs for it 
in 80 Micro. Can you explain why? (Ken- 
neth Fonseca, Los Angeles, CA) 

A^One thing to keep in mind about 
• the Model 4P is that all Model III 
and many Model I programs will run on 
it. While the program listings might not 
explicitly say 4P, most will work fine. 
Also, a great many of the more powerful 
programs for the Model 4 series are writ- 
ten in machine-language, such as Har- 
din Brothers' windowing program for 
the Model 4 (June. July, and August 
1985. p. 102. 100. and 98. respectively). 

9 ©The letter from Jon C. Schultz in 
•your August column (p. 16) con- 
cerned a Radio Shack disk drive he 
bought in Japan that he can't get re- 
paired. Your answer was to write to Tan- 
dy's Japanese division and ask for a 
service manual. I believe I can help him. 
I don't have the service manual for the 
specific drive he has but I'm quite sure 
that I can repair it for $50 or less if he 
will send it to me at my floppy disk drive 
repair service. 

For your information, we charge $25 
for cleaning, lubrication, and complete 



alignment of any single-sided 35-. 40-, or 
80-track drive. Double-sided drives cost 
$5 more. If something has to be fixed to 
achieve proper alignment, we charge 
$25 extra for troubleshooting and repair. 
That includes all parts except for heads, 
motors, and special LSI chips (found in 
units like Atari drives, for example). And 
if you need one of those noncovered 
parts, we'll give you the option of taking 
the unit back at no charge. 

We service only 5'/i-inch floppy drives 
but handle all brands, models, and con 
figurations. We have a simple Atari 400 
to test Atari-compatible drives, an Apple 
n + to test Apple-compatible drives, and 
a VIC-20 to test Commodore drives. But 
you might be interested to know we use 
a pair of TRS-80 Model I computers with 
Percom Doublers to test all other drives, 
such as IBM, Texas Instruments, Os- 
borne, Compaq, and Sanyo, after they 
come off the bench. (Les Logan, Logan- 
Bower Mini-Floppy Center Inc., Norfolk, 
VA 23513) 

A* 

11 • Thanks for your help. 

9»I have written several programs 
•that require the deletion of rec- 
ords from direct-access files. I can put 
deleted records at the end of the file with 
keys such as ZZZZZ or something simi- 
lar, but I would like to have the option to 
shorten the file length by changing the 
directory entry. Is there a patch or a 
POKE that changes the length charac- 
teristic in the directory of a TRSDOS 1.3 
system so that I can shorten files? (Rich- 
ard Earp, Pensacola, FL) 

A e I know what you mean about 
•wanting to delete such records, 
but fooling directly with the disk direc- 
tory is not something you should do 
lightly. The DOS does more than Just 
count the number of records in a file, it 
maintains a granule allocation table 
(GAT) that specifies which sections of 
the disk are free and which are occupied, 
a list of the tracks and sectors occupied 
on the disk by each file (in that file's di- 
rectory entry), and the exact byte in the 
last sector immediately following the 
last byte of your file. 

Changing the file length without 
changing the associated information in 
the GAT and directory entry is begging 
for a disaster. A time-consuming but 
simple way to delete such files is to write 
a Basic program that just copies the data 
to a new file that is the proper length, 
then deletes the old file and renames the 
new one with the old one's name. While 
this is slower, it has the advantage of let- 
ting the DOS do all the file location work, 
and doing it properly. 

For more information about the design 
of the directory track, get Harv Penning- 



ton's book TRS-80 Disk & Other Myster- 
ies from Montezuma Micro. The book was 
written for the Model I. but the directory 
track design is the same for the III. 

9 •When I use a Model 4, an Epson 
• FX-80 printer set for a 2K buffer, 
and Model 4 Basic, and I type in the com- 
mand OUT 248, 15. 1 may or may not get 
the desired compressed print. When it 
works correctly, exiting Basic leaves the 
printer in the compressed-print mode. 
What do I need to do to assure that the 
response will be compressed print? (I 
presume that what precedes that com- 
mand is the key, and have tried preced- 
ing OUT 248, 15 with the command 
OUT 236. INP(252) OR 16.) 

Also, how do you define drive 1 as log- 
ical drive 5? (R.M. Doerr. Rolla, MO) 

A 9 What you are doing is sending 
• the code 15 to your Epson print- 
er. Another way to do the same thing is 
to type LPRINT CHR$(15) from Basic. 
I'm not sure why the Out command 
doesn't always work. 

Setting drive 1 to drive 5 is simple. At 
the TRSDOS prompt type. SYSTEM 
(DRIVE = 5. DRIVER = "FLOPPY/DCT ") 
and press enter. The floppy driver pro- 
gram will prompt you for the physical 
location of the drive you want read- 
dressed. In this case type in "2" and 
press the enter key. And that's it. If you 
now type "DIR :5". the drive light on 
drive 1 will come on and the disk in it 
will have its directory scanned and dis- 
played. Don't use this technique to make 
drive zero another logical drive. While 
you can do so, you might have difficulty 
trying to boot up your computer with the 
modified system. 

Once you're satisfied with drive ar- 
rangement, use the SYSGEN command 
to save the new configuration to your 
disk. The next time you turn on the 
power, drive 1 will act as drive 5. 

9 ©In the August 1985 issue (p. 16). 
•Carl Stumer wrote about a prob- 
lem that he was having with Super- 
Scripsit and the alignment for the spe- 
cial characters. Your suggestion to try 
different increments until he discovered 
the magic number was close to target. 

I had the same problem and wrote to 
Tandy. They informed me that the spac- 
ing values listed in the Daisy Wheel 
Printer 410 manual were incorrect. If 
you print in elite or pica pitch, the width 
values are always 10 or 12 respectively. 
If you are printing in proportional spac- 
ing, the table values given in the printer 
manual on page 28 need to be multiplied 
by 2. After I followed these adjustments, 
my output lined up correctly. I didn't 
find anything wrong with SuperScripsit. 
(David J. Kelton, Richmond, VA) 
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A # Thank you for Informing us of 
• the exact nature of the problem. 
And it's nice to know that the problem 
isn't SuperScripsit as we thought. 

9«In response to Craig L. Cole's 
•question in the February 1985 is- 
sue (p. 18), I have noticed one other up- 
grade for the Model I that seems prom- 
ising. In the September 1984 issue (p. 
182). Micro-Labs Inc. advertises 80- 
GRAFIX. a plug-in. clip-on board up- 
grade for any Model III/I to provide 128 
user-definable characters. It comes with 
over 20 programs and costs $99.95. It's 
very brief and not well explained, but I 
would interpret the "user-definable 
characters" to be characters that use the 
"graphics" built in to the Model I: the 
384 by 192 (I believe) pixels from which 
the computer creates the characters. 

Is this board still made? If so, can you 
clarify what the board does and tell me how 
I can get it? (Greg Bryant. Raleigh, NC) 

A^Yes. it is still manufactured. You 
• can order it from Micro-Labs Inc. . 
902 Pinecrest, Richardson. TX. 75080 
(214-235-0915). Unfortunately, I don't 
have any more information than what 
was in that advertisement. If anyone out 
there has bought and used this device, 
would you like to tell us about it and give 
your opinions? 

9« I have a Model I Level II com- 
•puter. I bought the parts from Ra- 
dio Shack and installed a lowercase kit 
without realizing that I need a driver pro- 
gram. Then Radio Shack told me that 
they could not furnish the driver! Can 
you or one of your readers help me on 
this one? (Edward R. King. Blooming- 
ton. TL) 

A 9 Dennis Kitsz's book. The Custom 
• TRS-80 & Other Mysteries, has a 
short machine-language driver you can 
use either in DOS or Level II Basic, as well 
as a key repeat/debounce routine. This 
book is currently available from Monte- 
zuma Micro. If you don't already have it, 
you'll find it an excellent investment for 
your Model I. In addition, when you up- 
grade to DOS. you'll find that most 
DOSes automatically include an upper-/ 
lowercase driver as part of the system. 

9* I am acquiring a Model 4 and an 
• MS-DOS machine. I'd like to keep 
my Model I on-line for communications, 
but it takes up a lot of space. The solu- 
tion would be to hide the expansion in- 
terface and the central processing unit 
under my desk, extend the monitor ca- 
ble, and then buy an external keyboard 
with a long cable. How could I patch the 
new keyboard into the system or where 
can I find information on same? (Joel M. 
Reed. New York. NY) 



Al Dennis Kitsz's book. The Cus- 
mtom TRS-80 & Other Mysteries. 
has Just the solution you want. Kitsz de- 
signed a remote keyboard and video 
setup to let him put his Model I in one 
room while working in another (this was 
so he could sit beside his warm wood 
stove without worrying about the smoke 
or dust contaminating the computer or 
its drives). It isn't difficult; it just re- 
quires a little soldering work. 

9*1 am writing in response to 
•Charles H. Samuel's question re- 
garding the sort from the Tandy news- 
letter (June 1985, p. 17). The code in 
question is a call to the CINT function in 
ROM. CD 0A7F. This code is in the same 
address in both Models I and III and con- 
verts the number the USR statement 
passes to an integer in the HL register 
pair. Many machine-language programs 
use this call to properly load HL with the 
passed parameter. 

The easiest way to implement these 
subroutines on the Model 4 is to replace 
CD 7F OA with zeros (NOP instructions), 
then define a variable, such as Sort, as 
the starting address. If the integer vari- 
able N contains the number of elements, 
you can invoke the subroutine by the 
statement CALL SORT (N). 

Model 4 Basic appears identical to 
MBasic in CP/M. The pointer to the vari- 
able in parentheses automatically loads 
into the HL pair. This is described in the 
TRSDOS 6 manual in Part n under the 
Call statement. 

People accustomed to loading an inte- 
ger array with multiple parameters can 
use this same method. Delete the CD 
0A7F statements in the routines, define 
a variable to point at the entry point, and 
execute the calls by the Basic statement 
Call routine (P%(0)). 

Not only does this work, but following 
the purpose of machine-language sub- 
routine calls becomes easier, since you 
can make a variable name more descrip- 
tive than a USR statement. (Larry E. 
Fosdlck. Athens. GA) 

A m Thanks for troubleshooting the 
• sort routine. You can now use it 
on all the low-number series Tandy com- 
puters, Models I to 4. 

9* I am writing about a letter from a 
•reader in Germany (January 
1984. p. 28) that described the problems 
he had with his computer when he tried 
to connect it to the 220-volt. 50-hertz 
power line. We have this kind of power 
line in Argentina and I recently had a 
similar problem with the drive motor 
self -starting. 

After a long session with an oscillo- 
scope checking the various test points in 
the computer. I found a problem in the 



power transformer, which has a primary 
winding designed for 1 10 V and 60 Hz. 
Apparently the transformer was de- 
signed with little margin for overload. 
When you connect it to a 50 Hz line, it 
overloads due to the overmagnetization, 
and the output results in a distorted sine 
wave with plenty of harmonics. 

The drive, a Tandon TM- 100 sold by Ra- 
dio Shack as an external unit for the 
Model III, has two power supplies: a + 5 V 
and a + 12 V. The + 5 V is built around a 
three-terminal regulator, which is a high 
gain device and subject to auto oscilla- 
tions. Because the power supplies put out 
a distorted waveform, the harmonics 
reach sine wave proportions and the reg- 
ulator would oscillate at regular intervals. 

The control lines of the drive are active 
low (low voltage indicates a logical zero), 
so the Motor On line (among others) is 
pulled up to a logical 1 ( + 5 V) to signify 
an off state. Because the logical 1 de- 
pends on the + 5 V line, when the regu- 
lator oscillates this power line drops to 
zero. The servo motor, which works 
from the + 12 V line, is fooled into think- 
ing a true Motor On signal has been re- 
ceived and turns on the drive motor. 

The solution is to replace the current 
110 V power supply with one using a 
220 V 50 Hz primary winding. (Javier 
Henderson. Buenos Aires. Argentina) 

A # Thank you for a clear description 
•of the mysterious overseas self- 
starting drive problem. If your overseas 
system suffers from this complaint, just 
replace the current drive power supply 
with a new one designed for the 220 V 
power grids frequently used worldwide. 

9 • This is a response to William 
•Kirksey's question about how to 
transfer Radio Shack's MicroChess from 
tape to disk (August 1984, p. 14). I have 
a dual drive 48K Model III running TRS- 
DOS 1.3. By using the Tape command I 
could transfer my version of MicroChess 
from tape to disk. Since you have a 
Model III, try using TRSDOS 1.3 to make 
the transfer. (S.R. Perry. Hayward. CA) 

A m So it Is possible to move the game 
• to disk. I was afraid that there 
might have been some noncontiguous 
code in it that precluded the transfer. 
Thanks. ■ 

You can reach Radio Shack's National 
Parts Division at 900 E. Northslde 
Drive. Fort Worth, TX 76102. 817-870- 
5662. M/C and Visa accepted: each or- 
der has $1 .50 handling charge. 

Terry Kepner Is a freelance writer and 
programmer, and an associate editor of 
80 Micro. He's been writing about mi- 
crocomputers since 1979. 
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Attention TRS-80™ owners 
who now have a "PC" 



SuperCross/XT 

Easily transfer files from the TRS-80™ 

TO MS-DOS™ OR CP/M™ AND BACK! 

80 -MICRO summed it up. The value of this program far exceeds its price... 

it you work with different computers, its a must " 

4-STAR Review - July 1985 issue 

'Don't be confused by competitor* that are really BASIC 

translator* with very limited transfer capabilities! 
'SuporCross XT and SuperCross/XT-Plus are the MOST 
powerful file-transfer utilities available for tha TRS-80! 

SuperCROSS/XT will allow you to COPY files back and forth between 
different operating systems. Up to 170 of them - including PC/MS-DOS 
1.x,2.x/3.x (single or double-sided). CP/M*. or CP/M 2.2 on your TRS-80™ 
Model 4/4P, III. or l/DD. You can do this with your existing hardware and 
SuperCROSS/XT, eliminating modems, cables, and terminal program 
transfers. SuperCROSS/XT runs as a /CMD file under your TRS-80 
operating system. Data files, spreadsheet files, and text files can also be 
moved between machines, like years of Visicalc™ files, business letters. 
legal drafts, or medical records, for example. 

Comments and letters on-file from registered users are unusually 
enthusiastic about this product and its ease of use. It WILL do what you 
think it will do, it's easy, and it WORKS GREATI New features in 
SuperCROSS/XT include "tagging - files for multiple COPY'S or KILL'S to 
eliminate many unnecessary keystrokesl 

Some unsolicited customer com ments from our registration cards... 

"Powerful A easy to use' - GPP. Chicago L 

'A very handy product worth much more than the pnce. '- KA, Port Si. Luoe FL 

'Superb product!' - JF. Calgary Canada 

'Excellent productl Works as advertised. ' - GF, Boise ID 

"Worksl R&picel I can now talk to PCsl' - CN, Saratoga PA 

-Excellent No problems at at. ' RH, Santo Domineo Dominican Republic 

"Super! I performs the task I needed done" ■ TT, Rockvile MD 

"Fantasticl I transferred my ties within 1 hourl' ■ PJS, RoKa MO 

"LOVE ITT -Col. CDL APO San Fran&sco CA 

"Doc s straahtlorward i understandable. Sofves my problem ' - DG. C. Chase. MD 

Top Notchl Works tor me' - DB. Lancaster PA 

-Outstanding! Great product as usual ' - CL Los Angeles CA 

"Will save 100's of hoursl Kl protect my 4P Irom obsolesence'RJ. Denver CO 

"Program works very wet. I kke ir ■ MOM, Rochester, NY 

"Superb. Easy to understand documentation ' - RES. St. Loom. MO 

CNVBASIC/CMD. available seperately, "preps" your BASIC programs 
before sending over with SuperCROSS/XT. It will make most of the syntax 
and spacing changes required for converting Model l/lll BASIC programs 
for use on MS-BASIC. CP/M BASIC, or Model 4 BASIC. Complex or 
commercial business packages written in BASIC probably will not convert 
100% over by our or any other BASIC translator. 

'Some of the DOS Formal* Supported: PC/MS-DOS variations Include 1 x. 
2.x/3.x single or double-sided (IBM and most compatibles), and Tandy 2000. CP/M 
variatons include most well known single and double-6«Jed formats including TCP/M 
3.0*. Montezuma Micro 2.2 tall versions), Holmes and uo to 160 others including: 
ALTOS. CROMEMCO. DEC. EAGLE. EPSON. HP 125. CP/M 86. KAVPRO. LNW-80. 
MAX-80. MORROW. NEC. OSBORNE. OTRONA. SANYO. SUPER8RAIN. TELETEK, 
TELEVIDEO. TRS-80 LIFEBOAT/I. OMIKRON/I. HOLMES/3. HURRICANE 
COMPACTER/3. SHUFFLE BOARD/3. XEROX. ZENITH-HEATH. & 8" ltd. CP/M. 

Important! Please specify Mod l/DD, III, 4/4P, or Max-80 
computer type required. 



SuperCroas/XT (70 disk formats)* 
CNVBASIC/CMD alone 
•BOTH! ■ COMBO Special! 



$ 99.95 
$ 29.95 
$119.95 



SuperCrossXT-PLL/S (170 disk formats) $129.95 

'BOTH! • SuperCross/XT PLUS Combo Special! $149.95 

"includes CNVBASIC/CMD 



Super Utility 

for PC/MS-DOS™ 



Fixed/Floppy Disk-Tools for IBM PC™, XT™, AT™, 
Tandy 1000, 1200, 2000 and other compatibles. 

Data file recovery, disk exploring, 
zapping, ana MUCH more! 

Accidental deletions and disk directory problems can happen to anyone 
at anytime... a power spike, fingerprint speck of dust hardware problem, 
or simply typing DEL V in the wrong sub-directory can destroy critical 
data in a moment without warning. Therefore we introduce Super Utility 
for the PC - an easy to use disk utility containing many functions sorely 
needed in today's PC/MS-DOS computing environment 

With SU/PC you can restore damaged or deleted files using two different 
methods (one very easy, the other a bit tougher). Even clusters of an 
erased file assigned to another file can still be restored, unless the user 
has physically written over every byte of the original data (most applicable 
with word processing files). 

In addition to file repair and recovery, Super Utility provides sector 
verify, sector editing, modification of sectors in Hex or ASCII, ease of 
renaming of files and setting their attributes (lock and unlock files, etc.), 
string search, copying sectors to a file, diagnostic sector checking, 
mapping of the FAT table of a file or an entire drive, visual graphics 
pertaining to your system, and full directory and sub-directory editing 
without endless menu-hopping - all in one program. Want to change the 
name of your sub-directrory without copying all your files to a new one? 
Just retype a new name over the old one with SU/PCI The sector display 
mode displays all 512 bytes on-screen at one time and allows you to fully 
explore your disks SEARCH and CHANGE are nice here tool Will find any 
occurance of a byte or string on your disk. Compatible with DOS versions 
2.0 - 3.1 on most systems. Some computers may require the use of PC- 
DOS. Color, composite, or monochrome video are supported. A great tool 
for fixed disk users as well as floppy. Also compatible with IOMEGA'S 
Bernoulli Box™ storage device (soon to be distributed by Tandy as the 
Disk Cartridge System). Easily the most POWERFUL PC/MS-DOS disk 
utility available today. Please do not confuse the MS-DOS version of 
Super Utility with the TRS-80™ version. Super Utility for MS-DOS 
Is NOT SU* from the TRS-80 "ported over". SU/PC is a totally 
new program that fills the gaps that PC users have most need of and have 
asked us for. It's aimed at the beginner, the "office user", hobbiests, 
6tudents of the PC. or programmers alike. Many of our users say this is 
much easier than NORTON'S. 

So, why not be certain about the safety of your data (and your peace of 
mind) when you can have Super Utility/PC disk insurance right on 
hand at an unusually low price? Make your new computing life easier, more 
fun. and knowledgeable all at the same time. Unprotected. 
Requirements: IBM PC or compaltole running PC/MS-DOS 2x-3.x. minimum of 128K 
memory, and al least one disk drive. PC-DOS may be required lor use 
IBM. PC, XT, & AT are registered trademarks of International Business Machines 
Coip. MS is a reg. trademark of Microsoft. TRS-80 s a reg. trademark of Tandy . 



• Introductory Offer • 

only $89.95 



Prepaid or charge card orders (only) include free UPS shipping to US addresses! 
Blue label. COD. or over-nxjht shpping available at extra charge. Vsa-MaslerCard 
accepted. Canada, please add S3: airmail. Other countries add $15 for airmail. 
Foreign orders, please use Charge Cards ONLY. Checks not drawn on US banks 
not accepted. Texas residents must add appropriate aalea lax! 



17060 Dallas Parkway, Suite 114 
Dallas, IX 75248 

(214) 733-4475 
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Holiday Specials 
from PowerSoft 



SUPER UTILITY Combo Specials 

Attention Super Utility Users: (registered or otherwise) 
Our ever-popular book INSIDE SU+ J_x has been revised and renamed to now 
include all the changes that have occurred in the past two years since it was 
last revised. This perfect-bound, large format, slick 100 page* book explains 
all the ins and outs of using these powerful utilities to the fullest of their 
capabilities. If you own SU+ 3.x, SU4/4P , or PowerTOOL this book will really 
add to your knowledge and maybe explain some things you didn't understand 
before. Lots of tips, hints, and suggestions are included, as well as helpful 
information for the novice as well as the "pro". Disk theory Is explained as 
well. The book is now shipping, and a real value at only $19.95. its list price, 
but this month we're offering it for only $151 Save $51 If you are a new Model 
4 owner and a new SU4 owner as well, and never bought the earlier edition of 
this book, then NOW is the time to get some great reading material about 
what you have! 

Don't own Super Utility yet?? Buy our world-famous SUPER 
UTILITY* 3.2 or SUPER UTILITY 4/4P and add our new edition 
of USING SUPER UTILITY for only $5 exXra'.Save $151 

Super Utility* 3.2 for the TRS-80™ I, III, 4(111) $79.95 

Super Utility 4 for the TRS-80™ Model 4/4P/4D $79.95 

USING SUPER UTILITY Book Sale price $15.00 

» Special combo SU with new book for only $84.95! « 

Super Uiilly tor the TRS-80 it "protected". It comas with two copies of the program. however Upon 
regislenng. you may cdtr in unprotected copy 



PRONTO from MISOSYS - a Sidekick type program for the Model 41 
YEAH Memory resident utilities including calculator, name/address file, phone 
numbers, notes, and morel All available at the stroke of a few keysl Retails 
for $59.95, but we bought a load of these (it's really great!) and want to pass 
them to you at the special holiday price of only $49.95. SAVE $101 

TRSDOS 6™ Programmer's Guide - only $15.00 

Excellent book by Roy Soltoff, contains many goodies left out of Tandy's 
Model 4 Technical Reference Manual! Not for beginners. 



Complete Automated Communications Setup for 
the TRS-80 Mod I, III, or 4(lll) 

Outgoing and incoming as well! 

The ST80-IH Smart Term Communication Syatem by Lance 
Micklus is now available from PowerSoft! ST80-III v3.5, an award winner, was 
formerly $150 by itself, the X-10 HOST package: which allows you to leave 
your computer "on-line" securely with full password protection, etc. (formerly 
$50), and Lance's Personal Bulletin Board Systsm (formerly $40) all 
together now in one package for the apeclal price of only $69,951 
You aave OVER $1001 If you have a modem (especially a Hayes or other 
auto-answer type) and don't have good software, tfts is the one to getlNow 
get EVERYTHING, In the way of telcom software, for your computer at one low 
pricel UNPROTECTED MEDIA. Requires only a single disk drive and 32k of 
memory. Please specify Model I or 111/4(111 mode). 

Only $69.95 completsl 



Do you use and Ilka Scrlpslt™, but wish It did a 

WHOLE LOT MORE? You'd like a lot of new features 
without relearnlng a whole new system? Our PowerScript 4.2 is just 
Ihe answer! PowerScript 4.2 adds two categories of additions to SCRIPSIT™. 
Directory/File functions (DIR, FREE, KILL CHAIN, LINK), and embedded 
printer control functions. With all the smarter printers out there, it doesn't 
make any sense to use a "dumb" word-processor anymore. In this case, 
"dumb" means it can't really control your printer to its fullest capacity. If you 



notice, there are MANY word processors out there for the TRS-80™ besides 
the ones from Tandy. We could recommend any one of these, IF YOU 
WANTED TO BUY SOMETHING NEW. One of the problems, however, is that 
you need to learn all new commands. The second problem (maybe the main 
one) is that you need to shell out a lot more money to buy itl PowerSCRIPT 
4.2 gives you many new features, while retaining the commands you already 
know - at a very low price of only $39,951 All your previous files will, of 
course, be compatible. PowerScript 4.2 received a 4 1/2 star rating in 80- 
MICROs July '85 issue. Supports Mod I, III, and 4 versions of SCRIPSIT™. 

Add alt this power to your program for only $39.95! 



Do you have a hard drive on your TRS-80? 

PowerSOFT has a complete line of Supreme Hard Disk Driver packages that 
offer much greater flexibility and auperlor performance over the standard 
drivers supplied by Tandy or other hard drive manufacturers for the TRS-80 
Mod 4, III, or I. They allow you to split up your hard drive into partitions of 
differing sizes, and also allow you to define granule sizes and other optimizing 
operating characteristics to achieve maximum from your drive. The drivers 
themselves can be used on hard drives of various capacities, not just 5 
megabytes, but any of the popular larger sizes now being sold. At the same 
time, the driver routines themselves (once relocated) are very small (usually 
less than 256 bytes. Most hard drive companies either sell or recommend our 
drivers. These drivers can also be used to allow a hard drive to be shared 
between LDOS 5.1 and TRSDOS™ 6 for Model 4 or 4P ownersl You can keep 
all your Model III programs AND your Model 4 programs, as well as the data, 
all on one hard drive. Just by booting a different disk (LDOS or TRSDOS 6) 
you are in the Mod III or Mod 4 mode running off your hard disk in either easel 
It's great. No reason to run from floppies when you can use the hard drive in 
either model If you have the 1 5 meg or 35 meg Tandy drive, you can now 
format it for full useage - NOT just 5 meg (Mod I, III or 4 mode) I If you have a 
4P, you can boot directly off the Tandy hard drive without a disk! Really I Just 
turn on the power. We have drivers for Tandy, Percom/Aerocomp, Hard Drive 
Specialists, and other hard drives using a Western Digital WD- 1000 or 
compatible controller board. Call us for complete details or write for a spec 
sheet. Only $99.95 complete. ^- — — - 

Whether you use our software driver or not, you NEED to use BACK/REST! 
See the 5- Star review In the Oct' 85 Issue . Shame on you if you're 
not backing up your data! If you've invested good money into a hard drive 
system, it doesn't make any sense not to have a BACKUP routine. 
BACK/REST makes that job easier and saves much time. And TIME IS 
MONEY. Dont delayl Save HOURSI BACK/REST will work with all that 
use LDOS or TRSDOS™ 6 including Tandy 5, 15 and 35 Meg drives. 

Hard Drive COMBO Specials I 

BACK/REST 1.3 for TRSDOS 6~aUXW $99.95 

BACK/REST for DOSPLUS 3.5 $75.00 

LDOS ToolBox $49.95 

Hard Dsk Repair 4 Recovery Took for LDOS - Mod IAII 

Model 4 ToolBelt $49.95 

Hard D«k Repair A Recover Tools for TRSDOS 6 - Mod 4. 4P, 40 

or if your hard drive is split Mod 4 and III - get bothl 

Both eeta of tool* tor only $75.00! 

BACK/REST and your choice of TOOLBOX 

for LDOS or MOD 4 TOOLBELT only $129.95! 

BACK/REST and BOTH ssts of tools only $159,951 

BACK/REST and our Supreme Rigid Driver' only $149.95! 

'add either LDOS TOOLBOX or Model 4 ToolBelt tor only $29 more! 

Fin* print These price* ere tor prepaid orden onV School purchase order* will not be accepted at 
the** prtoes Vim or MasterCerrfgieOy accepted COO orders will have $3 added to the total Rat rate 
shipping on any item or combinafcon ol Hem* Irpm pits ad if only S3 Blue Label or ovemght available 
at eitra cost Canadian airmail I* *4 and other Icetgn airman will be actual coil Checks not drawn on 
U.S. bank* not acceded 7**aj resident* mu§i add apprapnaie eaia* lax. 
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COLOR COMPUTERS 


LIST 
PRICE 


OUR 1 
PRICE 3 


26-3127 64K Extended Color Computer 2 


$219.95 


$175 00 


26-3134 16K Standard Color Computer 2 


119.95 


99 00 


26-3 1 29 Thmlme Disk Drive for Color Come 


34995 


290.00 


26-3018 Extended Basic Kit 


39 95 


36.00 


26-3030 OS-9 with Editor Assembler 


69 95 


59 50 


26-3012 Deluxe Joystick 


29 95 


2500 


26-1208 CCR-81 Recorder 


59 95 
. 149 95 


50.00 
139.00 




VIP Writer 


69 95 
69 95 


59.00 
59 00 
59 00 
57.00 


VIP Calc 












TANDY 2000 


26-5103 Tandy 2000 Two Disk 


$1599.00 


51225 00 


26-5104 Tandy 2000 One Disk & 10 Meg HD 


2499.00 


1885.00 


26-5111 Monochrome Monitor 


199 95 


165 00 


26-5112 Color Monitor 


599 95 


510 00 


26 5140 Hi Res Graphic Monochrome Board 


299 95 


255 00 


26-5141 Hi Rec Color Graphics Chips 


124 95 


105.00 


26-5160 Internal 128K Memory Board 


179.00 


150 00 


26-5300 Lotus 123 


495 00 


420 00 


26-5311 Microsoft Multiplan 


195 00 


165 00 


26-5320 Framework 


695 00 


590 00 


26-5352 dBase II (Data Base) 


595 00 


420 00 


26-5330 V ' ■ •.'• 


249.00 


205 00 


MODEL 200 COMPUTERS 


26-3860 24K Model 200 Portable Comp. . 


$999 00 


$725 00 


26-3866 24K RAM Mem Exp Chip for 200 


24995 


21000 


26-3804 AC Adaptor 


595 


500 


26-3805 Accoustic Coupler 


39 95 


34 00 


26-3816 8K RAM Memory Expansion Chip 


119.95 


95 00 


26-1409 Printer Cable 


14.95 


1270 


26-1410 Modem Cable 


19.95 
49 95 
39 95 


17 00 
42 50 
34 00 


26-3809 Briefcase 


26-381 1 Soft Carrying Case for 100/200 


26-1 183 Bar Code Reader 


99 95 


85 00 


26-3806 Disk Video Interface 


499.00 


415.00 


26-3829 Multiplan ROM for 100 


149 95 


1 2 7 50 


MODEL 4 COMPUTERS 


26-1070 Model 4D 64K 2 Drive Computer 


$1299 00 


S 895 00 


26-1122 64 K Memory Expansion 


69 95 


65 00 


26-1127 Model 4 Internal Drive 1 


399 95 


385 00 


26-1123 Model 3 to Model 4 Upgrade Kit . 


399 00 


385 00 


26-1084 Model 4P Modem Board 


149 00 


95 00 


26-1085 Model 4P Travel Case 


24 95 


21 25 


26-1 134 Model 4 Hard Disk Kit for I5meg 


79 95 


67 95 


26-1530 Multiplan Model 4 


199 00 


169 00 


26-1595 Super Scnpsit Model 4 


199 95 


169 00 


26-1635 Profile 4 Model 4 


249 95 


200 00 


26-2216 CP/M Plus Model 4 


149 00 


127 00 


26-2231 Double Duty Utility 


69 95 


58 00 


MODEL 12 & 6000 COMPUTERS 


26-6021 Model 6000 51 2K 2 Drive Comp 


4499 00 


3125 00 


26-6022 Model 6000 512K 15Meg HD 


5499 00 


3795 00 


26-6014 Model 12 to 6000 Upgrade 


1595 00 


1325 00 


26 6015 Model 6000 512K Memory Board 


1095 00 


905 00 


26-6019 Model 6000 256K Memory Kit 


199 95 


185 00 


26-601 1 Card Cage for Model 12 


199 00 


169 00 


26-6052 DT- 100 Data Terminal 


795 00 


600 00 


26-4155 15 Meg Hard Drive Primary 


1995 00 


1355 00 


26-4171 35 Meg Hard Drive Primary 


2995 00 


2095 00 


26-4157 Installation Kit for Primary HD 


349 00 


265 00 



All prices and offers may be changed or withdrawn without notice Advertised 
prices are cash prices COD accepted ($10 00 charge per carton on C O.D 
Call for further C O.D information ) M C .Visa. AX, add 2% All non-defective 
items returned will be subject to 10% restocking fee Defective items require 
return merchandise authorization. Call for R.M.A. Number before returning 
Delivery is subject to product availability 



CALL 




1-800-248-3823 /^■■-'.'■^fffl 



RADIO SHACK PRINTERS 


LIST 
PRICE 


OUR ] 
PRICE j 


26-1276 DMP-105 Dot Matrix Printer 


$ 199.00 


$ 169.00 


26-1275 TRP-100 Portable Thermal Printer 


299 00 


230.00 


26-1280 DMP-130 100 cps Tn. Mode Printer 


349 00 


285.00 


26-1268 CGP-220 Color Ink- Jet Printer 


699 00 


595 00 


25-1257 DWP-220 Daisy Wheel 


599 00 


460.00 


26-1277 DMP-430 24 Wire Matrix Printer 


899 00 


745 00 


26-1270 DWP-510 43 cps Daisy Wheel 


1495 00 


1225 00 


26-1274 DMP-2100P 24 Dot Wire Matrix 


1995 00 


1650 00 


26-1279 DMP-2200 HiSpeed Matrix Printer 


1695 00 


1440 00 


26-1269 PT-64 Printer Controller 


249 95 


210.00 


26-1498 SW-302 Printer Switch 


119 95 


100 00 


26-1477 Auto Sheet Feeder for DWP 510 


499 95 


420 00 


TANDY 1200 


25-3000 Tandy l200One Disk & 10 Meg HD 


$1999 95 


$1525.00 


25-3010 VM-3 Green Monitor 


219 95 


185.00 


26-3212 CM-2 Color Monitor . 


459.95 


390.00 


25-3040 Monochrome Display Adapter 


21995 


185.00 


25-3043 Graphics Display Adapter 


299 95 


255 00 


25-3044 Graphics Master . . 


695 95 


540 00 


25-3061 Captam Multifunction Board 


599 95 


475 00 


25-3130 MSDOS/BASIC 


89.95 


76.50 


25-3170 Wordstar Professional .... 


39595 


33500 


25-3160 Framework ... 


695.95 


590.00 


25-3161 PFSFile 


140 95 


119 00 


25-3190 dBase III 


695 95 


590 00 


TANDY 1000 


25-1 00C Mc )e '000 '?B- 1 Dot ft .<• 


$ 999 95 


$ 705 00 


25-1001 Model 1000 256K 10Meg HD 


1999 00 


1495 00 


25-1005 Disk Drive Expansion 1000 


199 95 


170 00 


25-1006 RS-232C Interface 1000/1200 


99 95 


8500 


25-1007 Hard Disk Control Board 


299 95 


25500 


25-101 1 Memory Plus Board 


31995 


25500 


25-1013 Modem 1200 Option 1000/1200 


299 95 


230 00 


25-1025 10 Meg Hard Disk 


699 95 


559 00 


25- 1 50 1 MS-DOS Reference T- 1 000 


34 95 


29 00 


25-1502 BASIC Reference T-1000 


34 95 


29 00 


26-321 1 VM2 Green Monitor .... 


149 95 


125.00 


26-3212 CM2 Color Monitor 


459 95 


390 00 


EPSON/COMREX PRINTERS 


20001015 Homewnter 10 


$ 288 00 


$ 230 00 


20001025 LX-80 Dot Matrix Printer 


299 00 


250 00 


20001035 FX-85 Dot Matrix Printer 


499 00 


385.00 


20001040 JX-80 Color Dot Matrix Printer 


699 00 


485 00 


20001050 HI-80 4 Pin Plotter ... 


599 00 


390 00 


20002010 RX-100 Dot Matrix Printer 


499 00 


400 00 


20002030 FX-185 Dot Matrix Printer 


699 00 


525 00 


20003010 LQ-1500 18 Pin Head with Intf . 


1495 00 


1095.00 


20003510 CR-IIE Comrex Com Riter . . . 


499 00 


295 00 


20001510 FX-80 Tractor Feed 


39 95 


34 00 


20004080 NLQ Parallel Intr 


209 95 
49 00 


175 00 
40 00 


20001515 LX 80 Tractor Feed 



For Technical Questions and Information on our complete line of 
computer accessories and current prices. 

CALL 1-517-625-4161 
FOR ORDERS ONLY CALL 1-800-248-3823 

Mon.. Wed. & Fri. 9-9. Tues. & Thurs. 9-6, Sat. 9-3 

12* s. run in st perrs high M8872 



PULSE TRAIN / by Bradford N. Dixon 



Tandy's 1985 Seesaw: 
Revenues Up, Profits Down 



Tandyland 



Financially speaking, last 

year was pretty tough for 
Tandy. Although the com- 
pany took in 2 percent more 
money in fiscal 1985 (which 
ended June 30) than in 
1984, its net profit dropped 
almost 33 percent, the first 
such drop since 1978 (see 
the Figure). 

In raw figures. Tandy re- 
ported a $189.1 million 
profit on sales of $2.84 billion 
for fiscal 1985. That com- 
pares with a $281.9 million 
profit on $2.78 billion in 
sales the previous year. 

In comments published in 
the Fort Worth Star-Telegram. Garland 
Asher, Tandy director of financial plan- 
ning, blamed Tandy's bad year on the 
slumping business computer market. 
Asher cited as evidence disappointing 
sales of the Model 2000, on which Tandy 
took an $18 million write-off last April 
(see Pulse Train, August 1985. p. 21). 
The success of the Tandy 1000 and 
strong sales of the 1200 HD further 
weakened the 2000's sales position, ac- 
cording to Asher. and Tandy accordingly 
cut the 2000's price to $1,599 in July. 

Despite last year's financial setbacks, 
both Tandy officials and industry ana- 
lysts remain upbeat about the compa- 
ny's future. Don F. Sinsabaugh of Swer- 
gold Chefitz, a New York investment 
banking firm, sees some exciting new 
products on the horizon for Tandy. How- 
ever, none of them is in the microcom- 
puter market. "The videocassette 
recorder market will continue to grow. In 
audio, compact discs are strong, and cel- 
lular communications will have strong 
growth in the next couple of years as 
prices come down. Tandy will get its fair 
share of that." Meanwhile. Tandy's 
Asher says. "This is going to be a big 
year for new products, both in the com- 
puter area and [for] other merchandise." 

So far. the optimism seems justified. 
July 1985 sales indicate a rebound from 
Tandy's dismal fiscal 1985 numbers: 
Worldwide sales were up 12 percent over 




Figure. Tandy's annual net profits for 1975 — 1985. 

July of last year, and U.S. sales were up 
19 percent. 

With January approaching, we'll 

soon see if the rumors of a new Tandy 
Color Computer are on target. Specula- 
tion about a new breed of Color Com- 
puter has gone on for two years now, but 
recently the rumors have been full of ex- 
plicit details. 

Word is that the machine will run un- 
der Microware's OS-9 operating system 
with a 640- by 400-pixel screen, up to 
512K of RAM. and one double-sided 354- 
inch disk drive. The scuttlebutt on 
CompuServe puts the computer's price 
at $499. 

For old CoCo users, the good news is 
that Tandy will still sell the CoCo II. but 
at the reduced price of $99 and only in a 
64K configuration. Tandy might bundle 
DeskMate with the new computer, as 
they're doing with the Model 4D and the 
Tandy 1000. The CoCo DeskMate costs 
$99.95 and has two more functions than 
the 1000 and 4D versions: a simple paint 
module and a general-ledger module. 

As usual. Tandy won't confirm or 
deny reports of a more powerful CoCo in 
the offing. 

Meanwhile, speculation about a new 

Tandy laptop can, for the moment, be 
put to rest. The anticipated Tandy 600. 
which, according to rumor, would take 



on Data General's DG-1 MS- 
DOS portable, is vaporware. 
According to my sources, 
Tandy did develop a new 
laptop, though it wasn't MS- 
DOS-based. But the feeling 
in the Tandy Towers was 
that the machine was a 
kludge and would never 
make it to market. 

On the other portable 
hand, a new version of the 
Model 100 might show up 
soon. Tandy reportedly had 
a new thin-line 100 in the 
works as of early Septem- 
ber, readying it for an Octo- 
ber introduction. The re- 
vamped machine will have a 
minimum configuration of 
24K RAM and should cost $299. 

My source tells me that Tandy won't 
adapt the Model 200 to the new. thin de- 
sign. While that might sound like a non- 
story, the reason behind the decision 
should spark some interest. 

Apparently, Tandy's agreement with 
Kyocera Ltd. of Japan, makers of the 
200, was for a limited order of 85.000 
units. The stipulation was that if the ma- 
chine didn't sell as well as expected. Ky- 
ocera would produce no more machines, 
and Tandy would simply sell off its stock 
until it was gone. At this point, Tandy's 
still working off the original lot of 85,000 
computers, and has no plans to order 
any more. 

I often report how Tandy computers 

do against their competitors, but it's 
worth mentioning that Tandy also sells 
a significant number of printers, moni- 
tors, disk drives, and modems. In its 
July 22. 1985. issue. Computer + Soft- 
ware News published June sales figures 
for computers and peripherals, and 
Tandy ranked no lower than second in 
any category (see Table 1). 

Of the best-selling personal computer 
brands, Tandy/Radio Shack placed sec- 
ond with 20 percent of the retail market. 
They were second in the printer cate- 
gory with 18 percent of the market, and 
first in sales of monitors and disk drives, 
with shares of 18 and 21 percent, respec- 
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PULSE TRAIN 







% retail 




Brand 


sales 


Computers 


IBM 


30 




Radio Shack 


20 




Apple 


19 


Printers 


Epson 


18 




Tandy 


18 




Apple 


15 


Monitors 


Tandy 


18 




Apple 


14 




IBM 


14 


Disk Drives 


Tandy 


21 




Apple 


19 




IBM 


7 


Modems 


Hayes 


43 




Tandy 


20 




Apple 


13 


Table 1. Bes 


-selling brands of per- 


sonal computers and peripherals 


during June 


1985. 





tively. Tandy's share of the modem mar- 
ket was 20 percent, good enough for a 
second-place finish. 

MicroTrends 

Some microcomputer companies 
aren't happy about a recent deal be- 
tween IBM and the Mexican govern- 
ment, whereby IBM will own and oper- 
ate a microcomputer manufacturing 
plant in Mexico. That's a significant de- 
parture from Mexico's national trade law 
requiring that computer plants have 
Mexican majority ownership. 

Earlier this year, Mexico let Tandy start 
manufacturing Model 1000 computers in 
a Mexico City plant, but limited Tandy's 
ownership stake to 49 percent. Similarly, 
Apple has a minority share in an opera- 
tion that produces Apple lis in Mexico. 

Tandy's reaction to the exception was 
subdued; they were generally pleased to 
be able to produce their top seller in Mex- 
ico and open up a Latin American distri- 
bution network for the 1000. But Rich- 
ard Hojel, chairman of Apple de Mexico, 
didn't like it a bit. "What we're seeing 
here is a tremendous amount of arm- 
twisting by a very powerful company," 
said Hojel. "In principle I'm in complete 
agreement with IBM's presence, because 
I believe the best defense of private en- 
terprise is competition. But let's all play 
by the same rules." 

In August, Microsoft and IBM 

penned a Joint software development 
agreement that virtually guarantees Mi- 
crosoft's position as developer of future 
IBM PC operating systems. The move 
quashed rumors that IBM was preparing 
to introduce a proprietary operating sys- 



Device 


% sold 1983 


Digitizer 


33.2 


Data tablet 


11.9 


Light pen 


9.0 


Touch screen 


6.4 


Joystick 


17.5 


Trackball 


6.8 


Mouse 


9.4 


Speech 


5.8 


Total Sales 


$131 million 


Table 2. The U.S. 


workstation interface dev 



% sold 1989 (est.) 

18.6 
36.4 

4.4 
12.2 

5.1 

3.3 
13.2 

6.8 

$962 million (est.) 



tern for its PC line. In an interview with 
CW Newsnet. IBM analyst Michele Pres- 
ton of L.F. Rothschild. Unterberg, and 
Towbin said, "The agreement puts to 
rest whatever questions remained about 
IBM moving away from DOS. It's very 
positive for the industry." Microsoft is 
apparently free to license jointly devel- 
oped products to other manufacturers, 
good news for Tandy and other makers 
of IBM compatibles. 

Market researchers at International 

Data Corp. see a bright future for com- 
panies manufacturing data entry de- 
vices such as data tablets, light pens, 
and touch screens. IDC expects sales of 
these units, collectively called worksta- 
tion interface devices (WIDs), to increase 
sevenfold through 1989 (see Table 2). 

In 1983, manufacturers shipped 1.6 
million WTDs. IDC estimates shipments 
of almost 12 million units by 1989. In 
terms of revenue, IDC expects the WID 
market to grow from $131 million in 
1983 to $1 billion in 1989. 

Hot Items 

GTE's patting their Telenet network 

in the hands of the everyday telecom- 
muter with a service called PC Pursuit. 

Subscribers can call all BBSes and on- 
line data bases within GTE's 12-city net- 
work for $25 a month, regardless of the 
amount of time spent on-line. 

The catch is that you must also place 
your call from an area code covered by 
the network, which links Atlanta, Bos- 
ton, Chicago, Dallas, Denver. Detroit, 
Houston, Los Angeles, New York, Phila- 
delphia, San Francisco, and Washing- 
ton. According to Telenet president 
David Hann. GTE chose those cities for 
start-up because their local calling areas 
contain about 23 percent of the U.S. 
population. 

PC Pursuit supports 300- . 1.200-. and 
2. 400- baud operation; you can get more 
information about the system by calling 
800-835-3001. 



What would J. Edgar Hoover think? 
Microcomputer users who subscribe to 
CompuServe can now help track down fu- 
gitives on the FBI's 10 Most Wanted list. 

CompuServe members can access a 
file provided by the FBI of biographical 
information on the reprobates. If you 
have the proper hardware and Compu- 
Serve's Professional Connection or Vid- 
tex software, you can even get a high- 
resolution picture of the varmint. 

To access the 10 Most Wanted list, 
type in GO FBI at CompuServe's ! 
prompt. You then choose a vagabond's 
name from a list displayed on the screen. 

The reason for this service? According 
to CompuServe's Richard A. Baker. 
"Many of our subscribers are profession- 
als such as doctors, lawyers, and den- 
tists. Like everyone else, fugitives 
require the use of (professional] services. 
In addition, many of these fugitives have 
distinct scars, tattoos, and limps so alert 
subscribers may spot one of them." 

Appealing to the public seems to pay 
off for the FBI. Since 1950. when the 10 
Most Wanted program began displaying 
photos in post offices, citizen coopera- 
tion has resulted in the capture of 109 of 
the 366 fugitives on the list. 



Update 



Portable computers' popularity 
problems aren't confined to the U.S.. ac- 
cording to Systems Concepts Ltd.. a 
London-based research firm. In a study 
of the European portable market, they 
found that only 85.000 units sold on the 
continent last year, even though 12 mil- 
lion Europeans travel on the job. 

Systems Concepts believes the market 
isn't understood yet. Instead of focusing 
merely on portables' size, they say, sellers 
should bill their products as "personal 
support systems." The report notes that 
buyers want more than a machine that 
fills out forms; they want a system that 
will improve the way they work. Special- 
ized software for portables is another 
need, according to the study. ■ 
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TRS-80 AND IBM-PC 

Word Processing Program 



Computers Supported 
IBM-PC 
IBM-XT 
Tandy 1000 
Tandy 1200 
Tandy 2000 
Model 4 
Model 2 
Model 12 
Model 16 
Modem 4 CP/M 
Model 2 CP/M 
Max-80 
LNW 




C_80 x 24 DISPLAY using TRSDOS 6 or any MODEL III DOS. 

Built-in FORM LETTER and MAIL-MERGE capabilities. 

Build-in HELP SCREENS. 

55 seperately programmable MACRO FUNCTION KEYS. 

Performs PROPORTIONAL-SPACE right-margin justification 

on over 120 different printers (all drivers included FREE). 
Clntegrates with ELECTRIC WEBSTER spelling checker. 

Keyboard entry and printing of 31 European Characters and 

special symbols. 

□ IBM-PC, XT, Tandy- 1000, Tandy-1200, Tandy-2000 versions for 
color or Monochrome, now only $199.95. 

□ MODEL 2/12/16 versions now available for TRSDOS 2.0, 
TRSDOS 4.2 and CP/M. $199.95. 

U LeScript also available to run on TRS-80 MODEL I, MODEL III, 
LNW-80, LNW-TEAM (80 x 24), Holmes VID-80 (80 x 24), and 
Lobo MAX-80 (80 x 24). $129.95 



CAli 1 -305-259-9397 



ANITEK SOFTWARE PRODUCTS 
PO BOX 361136 D MELBOURNE FL 32936 



FREE SHIPPING WITHIN THE U.S.: OUTSIDE THE US ADD $10.00 FOR SHIPPING. 
FLORIDA RESIDENTS ADD 5* SALES TAX ALL ORDERS PREPAID BY CHECK. 
MONEY ORDER, CREDIT CARD OR C O D Circle 141 on Reader Service card. 



JV 



TRIAL-SIZE DISK OFFER 

Fill out and return this coupon to receive a free trial-size copy 
of the LeScript word processing system - a $25 00 value 



Name 


Address 


City 




State Zip 


Telephone 






My system is 






o Model I'll 


D Holmes VID-80 


CP'M LNW-TEAM 


o Model 4 


□ Model II 


CP'M VID-80 


Q MAX-80 


a CP.'M Model 4 


D TANDY-2000 


o LNW-TEAM 


c CP/M MAX 80 


O IBM PC 


Send to ANITEK • PO Box 361136 • 


Melbourne. FL 32936 
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READER FORUM 



Blasts from the Past 

If you're using Arnold van Bever- 
houdt's Graph Master program (Feb- 
ruary 1985. p. 68) with a DMP-120, 
here's a tip from Alfred Kohlberg Jr. of 
New Carrollton, MD. Set DIP switch 1 to 
on and rewrite line 3038 to read LPRINT 
CHR$( 10); :LPRINT CHR$( 1 3); :Y = Y + 1 : 
IF Y = 48 GOTO 3046. 

Ray Pelzer tells us that his Cross- 
check program (September 1985, p. 
66) won't recognize the period as a 
variable character in a Basic program. 
Clifford I. Knight cites the period as an 
undocumented but valid character in his 
article "Summer Romance: Learning to 
Love Model 4 Basic" (August 1985, p. 38). 

Speaking of Cliff Knight, his Scrip- 
Aid modification to Scripsit (January 
1985, p. 60) apparently isn't compati- 
ble with Scripsit 01.00.01. Don Cof- 
fin of Los Alamos, NM, found this out 
when he tried to use ScripAid with a ver- 
sion of Scripsit he had upgraded; the 
print functions didn't work. If you've 
had the same problem, try using Scripsit 
01.00.00. 

We're still getting Model 4 scroll-pro- 
tect routines in response to our article 
"Stationary Department" (May 1985, p. 
74). The latest is from Andy Levinson: 10 
NN% = 0:N%(0) = 78:N%(1) = 1798:N% 
(2) = 3902:N%(3) = 13841 :NN% = VAR- 
PTR(N%(0)):CALLNN%(NL%):RETURN. 
Simply set NL% for the number of lines 
you want to protect. Program Listing 1 
shows the source code. 

Gilbert A. Emmert of Madison, WI, 
submits a modification to our Fast- 
Bas Basic compiler (January 1985, p. 
42) that lets you specify an upper limit 
on the section of RAM FastBas uses and 
changes the reserved memory size from 
within the compiler. It also lets you de- 
termine the amount of variable space to 
set aside. You can now use compiled pro- 
grams with other high-memory programs 
and compile machine-language subrou- 
tines more readily. Program Listing 2 
lists the lines you should change. Also, 
delete line 1010. Finally, line 7275 deter- 
mines HIGH$ in LDOS; other DOSes 
might require different addresses. If 
your DOS has no equivalent to HIGH$, 
delete line 7275. 




Hints and Tips 

Two readers have written in with 
ways to activate the Model 4P's RAM 

test. Bernard P. Tiltges of Lexington 
Park, MD, found that you can press the 
hyphen, left arrow, and right arrow keys 
simultaneously, while J.A. Kempen of 
Coevorden, Netherlands, discovered the 
6-8-0 combination. 

Michael Friedland of San Bernardino, 
CA, has a simple JCL file (Fig. 1) that lets 
you send printer control characters 
to an Epson from DOS, Basic, and some 
programs. You use the @ key followed 
by a letter. The @ key translates into an 
escape code. Thus, the printer reads @E 
as "escape-E." 





Program 


Listing 1. Source code for scroll protect routine. 


LD 


C,(HL) 


;Get low byte integer argument from Basic 
;Condition code for scroll protection 


LD 


B,7 


LD 


A, 15 


;VDCTL SVC code 


RST 


28H 


;Do the SVC 


RET 




; Return to Basic 



Program Listing 2. FastBas modification. 

512 P0KEM,P:PRINTP;:M=M+1:IFM<-12+TP THEN RETURN ELSE 

CLS: PRINT: PRINT "Program has exceeded protected memory size" 

1001 GOTO 7200 

1005 Q=PEEK(16548)+256*PEEK (16549) :L=1 :K=0 :FP=0 :CF«=0 :MC=PEEK (16561) 

+PEEK (16562) *256+3-65536:M-MC 

1013 Q=Q1 

1015 

VT=-2*26+TP:VF=-4*26*(l+IS)+VTjVA=-4*NO*DO+VF:VD=-4*NT*DT*DT-2* 

NT*DT+VA:VS=-NS*(SL+1)+VD:VN«-(SL+1)+VS: PRINT: PRINT "Zero 

variables" :G0SUB 7136 'CLEAR 

7136 C1=VN:G0SUB 814:P=175:G0SUB 512:GOSUB 902:P«119:GOSUB 

512:C1=VN+1:G0SUB 814:GOSUB 900 :C1=TP-VN-1:G0SUB 814:P=l:GOSUB 

512:P=E1:G0SUB 512:P=D1:G0SUB 512:P=237 :G0SUB 512:P=176 :G0SUB 

512: RETURN 'CLEAR 

7200 IS=10 :DO=20 :DT=20 :SL=40 :NO=26 :NT»2 :NS=26 

7210 PRINT "Number of additional S.P. variables per letter="; 

IS;:INPUT"New=";IS 

7220 PRINT"Dimension of 1-D arrays=";D0; : INPUT" New«=";D0 

7230 PRINT"Dimension of 2-D arrays*" ;DT; : INPUT" New=";DT 

7240 PRINT'Length of strings=";SL; : INPUT" New=";SL 

7250 PRINT"Number of 1-D arrays allowed* "; NO j : INPUT" New=";N0 

7260 PRINT"Number of 2-D arrays allowed* "; NT; : INPUT" New=";NT 

7270 PRINT'Number of strings allowed=";NS; :INPUT" New=";NS 

7271 PRINT:PRINT 

7275 HP1=PEEK(&H4411)+256*PEEK(&H4412) :PRINT"HIGH$=";HPl ; 

7277 BPi=PEEK(16561)+256*PEEK(16562)+l:PRINT" Start of reserved 
memory ";BP! 

7278 INPUT'New start of reserved memory=";BPl :BP1«BP1-1 

7279 Dl=INT(BPl/256) :El=BPl-256*Dl:P0KE 16562, DltPOKE 16561, El 

7280 INPUT"Top of usable memory ";TPI :IF TP1>HPI THEN 7280 
7284 IF TPKBPl THEN 7278 

7290 IF TP1>32767 THEN TPl«TPI-65536 

7300 TP=INT(TP1) :PRINT:G0T0 1005 

7400 ' ************* END OF THE COMPILER ***************** 
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NEW LAZY WRITER 



Lazy 

Writer 



Lazy Writer, the innovative word processor, is NEW 
and BETTER THAN EVER! 

■ Customize your copy to work easily with any printer - supports 
printer special modes and typesizes. 

B DOS error recovery - never face losing a whole fil ■ because of a 
bad file sector. 

■ Lazy Writer (Model 4 version) accepts only correct file names 
and warns you if the name you choose is already in use on your 
disk - you will never accidently overwrite a file you still want. 

■ Lazy Writer's famous two mode operation • Text Lntry and 
Editing - makes use fast and easy. 

■ Edit with one-key mnemonic commands - "d" for delete, "i" for 
insert, etc. Same ease-of-use as always. 

■ Format your file before printing - see all page breaks, get an 
accurate word count. 

■ Start using it right away - a "welcome" program makes your 
working disk! 

■ Comes on mini MULTIDOS or transfers to the DOS of your 
choice. 



SPECIAL Of PER • 

• BUY LAZY WRITER 

• GET LA7.YMERGE 

• FORM LETTER PROGRAM FREE! 

• A $45 value 
your FREE gift 

• 

• BUY MODEL 4 MULTIDOS 
J GET ZEUS EDITOR ASSEMBLER FREE! 

• Free Zeus comes with reference card of instructions 

• buy the full manual for $19.95 
• 

• This offer good until January 1 




MULTIDOS 80/64 • FOR THE MODEL 4 



"...every DOS I've tried has either been too slow and weak 
or too complicated and powerful for me to use. I feel surf 
that many other people have this same problem, and 
LAZY WRITER FOR MODEL I, III, OR 4 . . $124 95 MULTIDOS is certainly the solution." 

Tim Knight in InfoWorld 

LazyMerge Form Letter program will pull names from a mail list kept in 

Lazy Writer. No need to buy an extra mail list program, plus you get great MULTIDOS 8064 runs Model III software, but lets you have 

flexibility. Insert any information from your mail list (including user de Model 4 features... does not run TRSDOS 6 software. 

rinedneldslintoaformletter.use all the formatting features of Lazy Writer., flip between 64 and 80 characters on the screen. 32 and 40 character widths 
including bold, underlining, etc. in your form letter. 



SUM" UP I The Quick Calculator 

never reach for a calculator again! 
use SUM-UP instead. 



INFORM? ION QUERY 

1TJUILDIN6 OR LOCATION. STREET MDRE 
"SCRIPTION.UNIT PRICE. OWWITV IM 
UP rWRAV - SELF COUNT!* 
KVMI" THENIR»|R»i 6010698 

><>"IH"THENIR:IR»1 G0T0718 

JF INSTRUCTION OR ENTERED DATA 
?«LEN<NAKII,S2>> IFLKL2THENJ.K2 



ION ARRAY COUNTER TO 8 PRINT CONTE 
CLR ««♦/- P«N0 •Xi«flAV FILLED ON SCREEN 



MODEL 4 VERSION HAS 80 X 24 CHARACTER SCREEN 




H pops up on the screen, over 
your application program 

■ <>dd. subtract, multiply, divide - 
algebraic or reverse notation 

■ works with your word processor, 
spreadsheet, or any application 
program 

■ send output to printer as you en- 
ter data 

specify Model I. Ill, or 4 



also available 
_■ runs Model 111 software 

■ use your extra 64K memory as a MEMDISK. automatically sets up MEMDISK as 
system disk, allowing use of the dnve for a data disk 

■ lor 4P owners, never load MODELIII/A file again! 

■ disk I/O code written lor Model 4 get fewer errors than you get using a Model 
111 DOS 

■ a much faster BASIC, many enhancements and debugging tools 

■ over 41000 free bytes of memory in BASIC 

■ runs BASIC programs written for the Model III in 64 characters, or easily mod- 
ified to 80 characters 

■ write programs using 80 character screen, function keys, and extra memory 

■ keyboard returns an extended character set, user controllable 

■ includes all the new features in 1 7 MULTIDOS 

MULTIDOS 80/64 for the Model 4 $99.95 

Get MULTIDOS for your Model I or III too. only $89.95 

ZEUS EDITOR/ ASSEMBLER 

• supports undocumented Z80 op codes and standard pseudo-ops 

• really FAST assembly 

• intelligent error display ■ shows line number and file containing error evrn when 
you don't pnnt to screen 

■ easy line editor won't let you enter incorrect syntax 

- remembers file name of source and object code, eliminates accidental overwrite 

• dynamic renumber, no more "no room between lines" 

• calculator mode gives answers in decimal, hex. and binary 

• GET command gets files from disk with lightening speed; handles big files so fast 
you'll think they're small 

• doesn't hog memory lots of room for source code 

• easy block move a! duplication 

• "pages" the screen backward ft forward for easy editing 

■ reads and writes files in ASCII. EDTASM. and Zeus compressed format 

• Model 4 version supports 80x24 lines 

ZEUS for Model I. III. 4, or MAX- 80 $79.95 



■ floating point math accurate to 8 
digits • scientific notation after that 

■ use text labels 

■ decimals align 

■ versions for all major DOS's 

■ uses only 5.5K of memory 



ONLY $24.95 



beat the price rise on Zeus ■ order now! 

AlphaBit Communications, Inc. E33E 

13349 Michigan Ave 
Dearborn. Michigan 48126 

We accept check, credit card, or will send COD Add $2 00 shipping & 
handling to all orders Add $1 65 for COD Michigan resident add 4'^. sales 
tax 

Circle 476 on Reader Service card. 



ScaJl (313) 581 2896 



READER FORUM 



Leigh L. Klotz of McComb, MS. re- 
ports that TRSDOS 6.2 lets you use pe- 
riods instead of slashes as separa- 
tors when entering the date on boot-up. 
and notes, "This makes filling in the 
date from the numeric keypad a snap." 

Model 2000 owners: Alice Davis of Co- 
lumbiaville. MI, sent the short Basic 
screen print routine in Program List- 
ing 3. Line 15 includes the number of 
lines to print, while line 20 represents 
the width. You can print portions of the 



Program Listing 3 


Model 


2000 


screen print routine 






15 


FOR A-l TO 


24 




20 


FOR B-l TO 


80 




30 


C- SCREEN (A, 


B) 




40 


LPRINT CHR$(C); 




50 


NEXT B 






60 


NEXT A 







screen by changing the values; for ex- 
ample, to print the lower right quarter, 
change line 15 to FOR A = 13 TO 24 and 
line 20 to FOR B = 41 TO 80. 

Figure 2 lists several patches we've 
received recently. The first, from Ken- 
neth Stahl of Manassas. VA, prevents 
Model 4 ALEDIT's J command from 
erasing the first column of the response. 
The second two. also from Stahl. let you 
permanently enable external drives 2 
and 3. respectively, under TRSDOS 6.2. 
The next four. 4-7, are from James R. 



Reed of Dallas, TX. The first eliminates 
delta symbols used to indicate two 
spaces in SnperScripsit. The next adds 
the library command Kill, which func- 
tions as Remove does. The third disables 
password checking. Finally, the fourth 
prevents the screen from clearing after a 
pause when reading long directories. 

Patches 8 and 9. from Adam Rubin of 
Wappingers Falls, NY. disable the carrier 
detect check so Models III and 4 Videotex 
Plus, respectively, will run with modems 
other than the Radio Shack Modem II. ■ 



SET *FF TO FORMS/FLT 
FILTER *PR TO *FF 
FORMS (XLATE«X'401B) 

Figure 1 . JCL file for sending Ep- 
son printer codes. 



1. 


PATCH 


2. 


PATCH 


3. 


PATCH 


4. 


PATCH 
PATCH 


5. 


PATCH 


6. 


PATCH 


7. 


PATCH 


8. 


PATCH 


9. 


PATCH 



ALEDIT/CMD (D05,46«C3 El 3E:F05,46-C5 D5 E5) 

BOOT/ SYS. LSID0S (D02,84«C3 :F02 ,84-C9) 

BOOT/ SYS. LSIDOS (D02 ,8E=C3 :F02 ,8E-C9) 

SCRIPSIT/CTL (D14, 28-18 !F14, 28-20) 
SCR35/CTL (D01,30=18:F01, 30-20) 

SYSl/SYS. LSIDOS (D02 ,81-4B:F02 ,81-00) 

SYS2/ SYS. LSIDOS (D02, 33-18 :F02, 33-28) 

SYS6/ SYS. LSIDOS (D0A,5F-00 00 00:F0A,5F-3E 69 EF) 

VIDTEX/CMD (ADD-73BE,FIND-C8 f CHG-C9) 

VIDTEX/CMD (X*489A'-0 0) 

Figure 2. Patches. 



Circle 440 on Reader Service card. 



ADD THE PICDISK10 YOUR PORTABLE 

AND GET THE PERFORMANCE YOU WILL 

WANT TOMORROW TODAY! 

• POWERFUL 

• CONVENIENT 

• EASY-TO-LEARN 

• RELIABLE 

FEATURES 

• 32K BYTES ADDITIONAL RAM 

• FILER (LOAD/STORE PROGRAM) 

• INDUSTRY STANDARD OPERATING SYSTEM (CP/M) 

SAVE on powerful, integrated T/MAKER SOFTWARE ($200.00) when ordered with PICDISK. 
WORD PROCESSOR • SPELLING CHECKER • SPREADSHEET • DATA BASE MANAGER 




$599.00 



CALL 1-800-421-6300 8:00-5:30 (PACIFIC TIME) OR 714-261-0503 (24 HOURS) 

PERSONAL INTEGRATED COMPUTERS 

18013 SKYPARK CIRCLE. STE. D. IRVING. CA 92714 

30 DAY REFUND GUARANTEE 
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INTRODUCING. 




,A. 



$ 49.95 

IBW PC Kf. XT. AT [ana conpacitHnl. >28K RAM One OouWc Sided 

D«li Dnve Color Graphics Adapter. Graprno Monitor 

Muuse or Tablet |opuorul|. DOS 20 ex nqher 




gr»- n vw K U and COHwy vimcr 
. .or* JLT-. WO )Oi OVMt |OS o*n 
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TO ORDER CALL 

1 [BOO) 621-B385 X 262 



REVIEWS / edited by Ryan Davis- Wright 



Top Draw: Micro-Labs' 
High-Resolution Graphics Tools 



by David Engelhardt 

• •••• 

GBasic 3.0 runs on the 
Models III (16K) and 4/4P 
(64K) and requires a high- 
resolution board and one 
disk drive. $49.95 (or free 
with the purchase of Micro- 
Labs' high-resolution board). 
Micro-Labs Inc.. 902 Pine- 
crest, Richardson, TX 
75080, 214-235-0915. 
Easy to use: * * * * * 
Good docs: • * * ir ir 
Bug free: * * * * it 

Does the job: * * * * * 

*•••• 

Draw runs on the Models III 
and 4/4P and requires Mi- 
cro-Labs' Grafyx Solution 
or a Radio Shack high-resolution board 
and GBasic 3.0. Micro-Labs Inc. (see ad- 
dress above). $39.95. 
Easy to use: * * * * * 
Good docs: * * • ir ir 
Bug free: * * * * * 

Does the job: ***** 

• ••• 

The Joy-Mouse Interface works with 

the Models III and 4/4P and requires a 

Color Computer joystick, mouse, or 

touch pad. Micro- Labs Inc. (see address 

above). $129.95. 

Easy to use: * * * * it 

Good docs: * * * ir ir 

Bug free: * * * * iz 

Does the job: * * * * ir 

Commercial software for the Models 
III and 4/4P high-resolution (hi-res) 
boards has been slow in coming, but off- 
the-shelf products are finally making 
their way into computer stores. Micro- 
Labs offers several packages for its hi-res 
board, including GBasic, Draw, and the 
Joy-Mouse Interface. The software 
works on Micro-Lab's Grafyx Solution 
hi-res board, which is highly compatible 
with Radio Shack's board. 

Overall, I was impressed with Micro- 
Labs' three products. They represent 
some of the best graphics products I've 




seen for the TRS-80-compatible high- 
resolution boards. While GBasic isn't 
fully compatible with Radio Shack's 
BasicG, it has more functions and fea- 
tures. And Radio Shack doesn't have an 
equivalent to the Draw program or the 
Joy-Mouse Interface. 

GBasic 3.0 

GBasic offers more features and ver- 
satility than Radio Shack's BasicG, even 
though it's smaller by about 500 bytes. 
It also provides wider printer support, in- 
cluding that for Radio Shack, Okidata, 
Epson. Anadex, Centronics, C. Itoh, and 
NEC printers. 

The GBasic disk contains 40 programs 
and files of practical applications, de- 
mos, examples, and utilities. It requires 
TRSDOS 6.1.X on the Model 4/4P, with 
Basic 1.1.0 (other versions of Basic won't 
work). GBasic will also merge with stan- 
dard Basic under TRSDOS 1.3. LDOS. 
DOSPLUS 3.5 and IV (and its extended 
Basic), and NEWDOS/80. Check with Mi- 
cro-Labs for the correct version of Basic 
for proper operation. 

GBasic offers some features BasicG 
doesn't. You can save or load high-reso- 
lution screens created with Micro-Labs' 
Draw program in standard picture file 
format from within GBasic. You can put 
an entire screen in reverse video format 



with a single command. 
You can even load a version 
of GBasic into high mem- 
ory, and call Assembly-lan- 
guage subroutines to 
perform hi-res functions. 

Micro-Labs designed 
GBasic 3.0 to fully support 
its hires board, but it doesn't 
completely support Tandy's 
board. The differences lie 
mainly in the commands 
that control screen resolu- 
tion. Also, Radio Shack's 
board doesn't allow text 
overlay of graphics, while Mi- 
cro-Labs' board does. 

GBasic Commands 

GBasic links itself to stan- 
dard Basic: you invoke its 
functions by preceding 
commands with the @ symbol. Some of 
the commands match those of Radio 
Shack's BasicG, while others differ in 
both name and operation. 

GBasic offers two commands to put 
you in hi-res mode, one for the Micro- 
Labs board, the other for the Radio 
Shack board. Micro-Labs recommends 
using @ONl to enable graphics on the 
Radio Shack board, since it doesn't show 
hash lines when writing to the display. I 
found the Micro-Labs board's @ON com- 
mand much faster in manipulating the 
display. The ©OFF command turns off 
the hires screen and returns you to the 
normal text screen. 

The Micro-Labs hi-res board gives you 
a choice of display density, which you 
specify with GBasic's Mode command. 
In addition to the standard 640- by 240- 
pixel resolution, you can select resolu- 
tions of 512 by 192 pixels and 320 by 
240 pixels. 

GBasic gives you myriad commands 
for drawing geometric figures. You set 
individual points by specifying X,Y 
screen coordinates and a color parame- 
ter that dictates different video densities. 
Available color values range from zero to 
255, which produce "colors" from 
blanks to solids. 

You can test these points to determine 
their status with the Point command 
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and a pair of coordinates. The command 
returns a value of 1 when the point is set. 
zero if clear, and 2 if it is out of the 640- 
by 240-pixel graphics boundary. 

You draw lines by specifying X,Y co- 
ordinates and a color value. Once you 
draw one line, you can continue to draw 
others by specifying only endpoints 
(X2.Y2 coordinates). Each time GBasic 
draws a line, the previous stop point 
(X2.Y2) becomes the implied XI, Yl 
value for the next line; you just keep sup- 
plying X2.Y2 coordinates. 

You can also make boxes and circles. 
The Circle commands not only let you 
draw circles, they produce ellipses with 
different aspect ratios, sections of el- 
lipses, and arcs as well. 

You can fill in any of GBasic 's shapes 
with the Fill command. You must make 
sure you enclose the fill area by solid 
lines or the fill will bleed outside the 
shape. A Fill parameter lets you stipu- 
late the density of the fill. 

You can change every point on the 
graphics screen to its reverse-video com- 
plement with a single command, and 
you can print text on-screen, specifying 
where it's to go with X,Y coordinates. 
You can print text from left to right, 
sideways from top to bottom, upside 
down from right to left, and sideways 
from bottom to top. 

GBasic even lets you simulate anima- 
tion with Get and Put commands. You 
can put small sections of a display into 
an array and retrieve it back to the 
screen in reverse video. You can also 
And. Or. or XOR the contents of the ar- 
ray to the screen. 

You define sections of the screen to be 
used as plotting areas or windows with 
GBasic's Using command. You can use 
the optional Frame parameter to frame 
the viewing area, fill it in with various 
patterns, or erase its contents. 

A Print command prints your graphics 
display. An available Printer parameter 
lets you specify what kind of printer 
you're using based on a predefined set of 
printer codes. 

Once you finish designing a screen, you 
can save it to or retrieve it from disk. Since 
GBasic saves displays in a disk file, you 
must use standard Basic commands to 
open and close them. For example, to load 
in a display file you type in OPEN"R".l, 
"FILE NAME/XXX":@LOAD:CLOSE. 

Utilities 

GBasic comes with several utilities. 
GTest is a small demonstration routine 
that runs through a series of graphics 
displays to verify GBasic's operation. 
While GTest isn't as long or extensive as 
Radio Shack's BasicG test, it seems to be 
effective. It also demonstrates some of 
GBasic's high-resolution displays. 




Figure. Printout of a high-resolution de- 
sign created with Draw. 

GBasic/LOD is the Assembly-language 
program that invokes GBasic's graphics 
commands. It loads itself into high mem- 
ory to accommodate machine-language 
calls to the graphics routines. 

SAVLOAD/CMD and SAVLOAD/BAS 
save and load high-resolution pictures 
to disk. 

Mode V performs the same functions 
as GBasic's @ON, @ONl, and ©OFF 
commands, and lets you control the hi- 
res display from TRSDOS: Setting V 
equal to zero disables graphics display, 
to 1 enables the 512 by 192 mode (640 
by 240 on the Model 4 board), and to 3 
enables 640- by 240-pixel resolution. 

The VECTORS/ASM and POINT/ASM 
source code files contain Assembly-lan- 
guage programs that demonstrate line- 



The Star Ratings 

80 Micro's star ratings reflect our 
reviewer's impression of a product. 

In most cases, the overall rating is 
an average of the ratings in each of 
the four specific categories. However, 
some overall ratings may be higher or 
lower than this average, depending 
on the reviewer's subjective opinion. 

The stars mean: 

*•••• Superior; 

*•*• Excellent; 

• •• Good; 

• * Fair: 

• Poor. 

The ratings terms translate as 
follows: 

Easy to use: How easy is it for the 
new user to use the hardware/soft- 
ware/book? 

Good docs: Is the documentation 
clear and helpful in explaining the 
product's use and anticipating user 
problems? 

Bug free: Did the reviewer encounter 
any bugs while using the product? 
Does the job: How well does the prod- 
uct do what it was designed for? 



drawing, screen-clearing, and point-plot- 
ting routines. You'll need an editor/as- 
sembler to access them. 

GBasic's Docs 

The GBasic manual is short, but 
makes up for its brevity with sample 
demonstration programs written in both 
Basic and Assembly language. It also 
provides the high-resolution entry 
points in upper memory so you can do 
your own Assembly-language calls to 
the graphics routines. 

Draw 

Draw is a 10K Assembly-language pro- 
gram that lets you create and edit so- 
phisticated high-resolution graphics. 
You use the arrow keys along with 
Draw's simple commands to create 
boxes, circles, set or reset points, and so 
on. You can also shift a screen in any 
direction, and save any portion of it to 
disk. In addition, Draw works with Mi- 
cro-Labs' Joy-Mouse Interface to facili- 
tate drawing. 

Draw comes on a TRSDOS 1.3 disk 
with a few sample high-resolution pro- 
grams; you have to convert it to use it 
with TRSDOS 6.X systems. The disk in- 
cludes a couple of design templates, two 
"TRON" movie pictures, a dragon, and 
a picture of the space shuttle. 

Draw Commands 

Loading Draw and pressing the enter 
key puts you in Draw's Edit mode. You 
use the commands displayed on-screen to 
draw pictures and manipulate the display 
(Table 1 summarizes Draw's commands). 

You draw in one of five modes. The 
first four, numbered zero to 3. appear on 
the command list. Mode zero clears 
every set point the cursor hits. Mode 1 
sets every point the cursor hits and 
mode 2 puts each point in reverse video. 
Mode 3 lets you skip around the display 
without affecting the picture and mode 
4 lets you enter text on-screen. 

Once you position Draw's cursor, press- 
ing the spacebar changes the point under 
the cursor to reverse video. This lets you 
do detail work without changing modes. 
You can clear the display with the clear 
key, and the break key exits Draw. 

Drawing lines and boxes is as simple 
as positioning the cursor over one point, 
anchoring it with the E or B key, mov- 
ing the cursor to the end point (corner 
point if a box), and pressing the appro- 
priate key again. You draw circles in the 
same way, except that you have to sup- 
ply certain parameters to draw ellipses 
and arcs. 

You fill in an area on the display with 
the F command. It accepts values from 
zero to 255 so you can stipulate the de- 
sired shading or binary bit pattern. Here 
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again, you have to enclose the area you 
want to fill to prevent spillover. 

You enter text on the screen with the 
T command, with characters compris- 
ing an 8- by 10-dot matrix. It supports 
upper-/lowercase characters beginning 
at the current cursor position. 

Draw includes two interesting capabil- 
ities for screen manipulation. The Ne- 
gate Screen command puts every point 
on the screen in reverse video, creating 
some intriguing results. The Reverse Im- 
age command produces a mirror image 



emulates resolutions of 640 by 240 pix- 
els. 320 by 240. 160 by 240, and 160 by 
120. You can also create dotted lines 
when you move the cursor in mode 2 at 
a "brush" setting of 3 or 4. 

The Get and Put commands send and 
retrieve drawings to and from Draw's 
22K memory buffer. You define the por- 
tion of the screen you want to save by 
specifying two opposite diagonal corners 
of a rectangular area. Then Draw 
prompts you to name the area with one 
or two characters. You can save as many 



< ARROW KEYS >— Move cursor 


< SPACE > —Complement point 


<SHIFT> + <ARROW>— Move screen 


< CLEAR >— New picture 


< BREAK > —Exit program 


< ENTER > —Exit subcommand 


— Clear point mode 


1— Set point mode 


2 — Complement point mode 


3— Skip mode 


B— Draw a box 


C — Draw a circle 


D — Dump screen to printer 


E— Set line endpoint 


F — Fill in shape 


G— Get block from screen 


J— Jump to position 


L— Load hi-res screen 


M— Display menu 


N — Negate screen 


P— Put block onto screen 


R— Reverse image L/R 


S — Save hi-res screen 


T— Text entry mode 


V— Velocity of cursor 


W— Paint brush width 


X— Random X coordinate 


Y— Random Y coordinate 


Table. Draw commands. 



of the original display. It even displays 
(ext in reverse. 

You can dump the display to a printer 
by pressing the D key. The Figure shows 
a high-resolution space shuttle dumped 
to my Okidata 92 printer. 

Press the S key to save your display to 
disk in standard SAVLOAD format, 
which you can load from GBasic or TRS- 
DOS. You can scan any directory by 
pressing the appropriate drive number 
key (zero to 3), then decide on which 
drive to save the display file. 

Other Features 

You can reposition Draw's entire 
screen in any direction by pressing the 
shift and arrow keys. The display moves 
one dot at a time in the up/down direc- 
tion and two dots in the left/right direc- 
tion. Dots that shift off the screen wrap 
around to the opposite side. 

The J command lets you move the 
cursor directly to a position you specify 
with X.Y coordinates. Entering X.Y val- 
ues of zero positions the cursor to the 
screen's top left-hand corner. 

The V command changes the cursor's 
speed. You can vary the speed in 10 in- 
crements, with zero being the fastest. 
The slowest speed moves the cursor 
across the screen one dot at a time. 

You can change the width of the cursor 
paint brush by specifying values of from 
1-4. This changes the pixel size, which 



blocks as disk space allows or until you 
All the 22K buffer. 

The Put command redraws a previ- 
ously saved block anywhere on the 
screen. You position the cursor where 
you want the upper left corner of the 
block to begin. When you invoke Put. 
Draw displays a list of all your saved 
blocks. You then specify how you want 
the block put back on-screen; you can 
copy the block to the screen and overlay 
the screen's contents, change each point 
to reverse video, or use the commands 
And, Or, and XOR to manipulate the 
screen and block contents. 

After putting blocks into Draw's 
buffer, you can save them to disk for 
later use. Press the break key, copy 
down the number that represents the 
end of the buffer, and exit Draw. 

Once in TRSDOS. save your modules 
to disk with TRSDOS's Dump com- 
mand: Type in DUMP FILE NAME/CMD 
(START = X'B9A8'. END - X'nnnn'). 

After saving the modules, type in DO 
DRAW and answer the prompt to load in 
LXDraw. which then loads the block 
module into memory and executes 
Draw. You can then look at the module 
names and write them to the screen with 
the Put command. 

Joy-Mouse Interface 

The Joy-Mouse Interface, a hardware 
add-on for the input/output expansion 



port on the Models III and 4/4P, lets you 
connect Radio Shack's Color Mouse. 
Koala Touch Pad. Electronic Book, joy- 
stick, or any other Color Computer joy- 
stick to your computer. The Interface 
also provides an on-board expansion 
connector in case you're using the one 
on your computer. 

The Joy-Mouse Interface works with 
GBasic, Draw, and Micro-Labs' graphics 
board, providing direct and quick cursor 
positioning and drawing. Resolution val- 
ues of both X and Y coordinates range 
from zero to 255. The hardware sup- 
ports both GBasic and Assembly-lan- 
guage programs. 

Micro-Labs based the Interface on the 
ADC0809 8-bityeight-channel analog-to- 
digital chip and uses only four of the 
available eight channels. It offers two 
joystick modes: proportional and eight- 
position. The proportional mode, for a 
Color Computer joystick, varies an ana- 
log signal. The eight-position mode 
works with Atari or Alpha-type joysticks 
that return a value corresponding to one 
of eight positions. You need different 
software for each of the modes. 

When using the Joy-Mouse Interface 
with Draw, you choose from two mouse 
modes. The first plots a screen resolu- 
tion of 256 by 240 pixels. The second 
mode offers full 640- by 240-pixel reso- 
lution but divides the screen into three 
sections with overlaps. (Since the inter- 
face can return only X.Y coordinates 
within the zero to 255 range (due to the 
8-bit analog-to-digital converter], it splits 
the 640 by 240 screen.) 

The ? command puts you in the full- 
screen mode (256 by 240 pixels) and you 
can set two horizontal dots at a time. The 
/ command puts you in the 640- by 240- 
pixel mode. Since this resolution splits the 
screen, the comma key shifts you to the 
right screen and the period key to the left. 

I used the Koala Touch Pad with Draw 
and found it easy to create drawings. You 
need to apply constant pressure on the 
pad while drawing or you'll start splatter- 
ing dots. While in Draw's Skip mode 
(mode 3), you draw when you press and 
hold the left Koala button. For intricate 
pictures, I recommend using the arrow 
keys. 

Conclusion 

If you're interested in high-resolution 
applications. I think Micro-Labs' soft- 
ware and hardware products offer any- 
thing you could want. 

I do have one complaint about the 
manuals' numbering: Micro-Labs 
skipped some of the numbers and dupli- 
cated others. This is a minor point, but 
Micro- Labs should rectify the problem so 
that the quality of the manuals matches 
that of the software and hardware.! 
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NEW SORTING UTILITIES 
FOR TRS-80 MODELS 1 & 3 



BSORT51 



- Multi-dimension BASIC array sort 

BS0RT51 is a replacement for the CM0"O" sort of the 
standard BASIC. Rather than being limited to single 
dimension string arrays, B S0RT5 1 can sort one or two 
dimension arrays of any type - integer, single or double 
precision, or string. Multiple key arrays may be specified, 
and the sorting on each key can be done in either ascend- 
ing or descending order. 

Tag arrays (those that do not affect the sort, but merely 
follow along) may also be specified. BSORT51 can also 
create an integer index array without affecting the actual 
order of the elements in the "sorted" array. For string 
arrays, "midstring" parameters allow sorting based on a 
portion or "midstring" of the key array elements. 

BS0RT51 is entirely machine language, so it is fast. It is 
invoked off of disk during program execution and will 
continue with the next statement in the program after 
execution. This means that NO extra memory is needed 
touseBSORTSI. 

Order L-32-200 at $39 plus S&H. 



DSM51 



- Disk virtual sorting utility 

DSM51 is THE versatile Disk Sort utility for Model 1 or 3 
owners using LDOS 5.1. It is a high speed, disk virtual 
sorting utility that eliminates the burden of sorting from 
your applications development project. DSM51 will 
create and maintain index files for you. Since the sort is 
disk virtual, your only limitation is the amount of available 
disk space, not available memory! 



OSM51 can sort random type files consisting of integer, 
single and double precision, or ASCII data fields. The file 
can be up to 65535 records long, with an LRL between 1 
and 1 024 bytes. Sort fields can be up to 253 characters 
long. Up to 1 2 fields can be used as select criteria or sort 
keys. Any type of relation (e.g. 'equal to', 'less than or 
equal to', etc.) may be applied to your selection criteria. In 
addition, logical operators (AND/OR) may be used. For 
instance: "sort by zip all people with a last name of either 
Smith or Jones". Any of the 1 2 specified select fields may 
also participate in the sort. For example: "sort in zip order 
and alphabetically by last name within the same zip". 

DSM51 can save a template of the sort/select spec- 
ifications to a disk file, and may also be run from JCL This 
allows even the non-sophisticated user to create index 
files with a single command. 

DSM51 is 1 00% machine language, so it is FAST! Com- 
pare these sort times to the method you are currently 
using: Select, Sort, and create an index of 1 000 records 
on two 1 byte ASCII fields, a double precision number, a 
single precision number, and an integer (34 characters 
total). With DSIM51, the select and sort is done in under 
20 seconds from hard disk, and under 40 seconds from 
floppy. 

DSM51 requires the LDOS 5.1 operating system, and is 
intended for use with user developed applications or pro- 
grams that currently use index pointer files. Please note 
that DSM51 creates an index file as opposed to actually 
re-ordering the data file. 

Order L-35-204 at $79 plus S&H 



Domestic orders add $1 shipping per product plus $5 
handling for any order not pre-paid by check or money 
order. 



FASTBACK 



NEW HARD DISK BACKUP UTILITY 
FOR TRS-80 MODELS 1, 3 & 4 

Replace Tandy's slow file backup program! 



Hard disk owners - tired of waiting forever while the HARDCOPY/BAS (Model 1 /3) or HDCOPY4/BAS (Model 4) program slowly copies 
your hard disk file to floppy sector by sector? Do you want to automate your backup procedure and greatly increase its speed at the same 
time? If so. the FASTBACK utility package is for you! 

FASTBACK is a 1 00% machine language program designed to quickly backup a file from hard disk to floppy. It automatically recognizes 
all floppy formats - single or double sided, 40 or 80 tracks, etc. Built in error checking prevents stopping in the middle of a backup - simply 
put in a new disk and the process will continue. FASTREAD allows you to restore the file from floppy back to the hard disk should the 
need occur. 

All prompts needed to start these utilities can be answered with a JCL file, allowing you to totally automate the startup. Once started, the pro- 
grams will prompt for a new disk when needed, and show the next disk number to insert. This makes it possible for an ordinary user to per- 
form perfect backups time after time without fear of mistake. 



Typical timings for FASTBACK: 

Model3 
Single sided. 40 track 



Model 4 
Double sided. 40 track 






50 seconds, full verity 95 seconds, full verity 

The FASTBACK package requires LDOS 5. 1 for the 
Model 1 or 3, and TRSDOS 6.2 for the Model 4/4P. 

Order L-30-055 (Model 1/3) or L- 30-056 (Model 4), 
each priced at $49 plus S&H. 
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Money Decisions: 
Bang for the Buck 

by Wynne Keller 

• ••• 

The Money Decision Series runs on 
the Model 4/4P (64K) and requires one 
disk drive. Tandy/Radio Shack. One 
Tandy Center. Fort Worth. TX 76102. 
$49.95 per module. 
Easy to use: ir ir ir ir ~Ct 
Good docs: ir ir ir ir ir 
Bug free: ir ir ir ir ir 
Does the job: ir ir * -ir ir 

The Money Decisions Series is a 
group of five Model 4 programs that 
can help you make financial decisions 
on anything from simple-interest loans 
to complex real estate investments. 

The Programs 

Most of us know how to calculate in- 
terest earned, but things get more com- 
plicated with additions to the initial 
investment and/or daily compounding. 
If you throw in tax percentage calcula- 
tions, you might get lost. That's where 
the Money Decision Series comes in: It 
offers virtually any kind of financial 
analysis you'd want to make. You, enter 
the appropriate data at the prompts, and 
the program does the hard work. 

Tandy sells the series in five independ- 
ent volumes: Basic Investment Analysis 
(Money Decisions I). Real Estate and 
Loans Analysis (II). Business Statistics 
and Forecasting (III). Business Manage- 
ment (IV). and Advanced Investment 
Analysis (V). You buy only those pro- 
grams of interest, and each works simi- 
larly: once you use one. you know how 
to use them all. 

Each module displays its available 
functions on a main menu. After you 
choose an option, you enter the appro- 
priate variables. 

At times, the variables' on-screen de- 
scriptions don't clearly indicate what in- 
put the program expects — you have to 
consult the manual. But you can make 
corrections after you input data, and you 
can calculate a data value on the fly us- 
ing the add. subtract, multiply, or divide 
symbol. 

You can display or print out the results 
of calculations. The on-screen results 
scroll by. but you stop them by pushing 
any key. If you print out the results, you 
can change or reenter the data values to 
repeat the same equation at the end of 
the printout. 

The Money Decisions modules include 
on-screen tutorials that describe overall 
functions and specific sections from 
within the program. The tutorial moves 



slowly, which is fine the first time you 
use it. but it's tiresome if you need infor- 
mation near the end. 

You may be able to get along without 
the manual by using the tutorial if you 
understand financial concepts. But. if 
any of them are new. you'll need the 
manual's detailed explanations. 

Strangely enough, you can't save your 
data to disk, and you lose everything in 
moving from one module to another. 

I did find mention in the Special Op- 
tions section in Money Decisions IV (hat 
you can save your input values and re- 
sults to a file, but the command doesn't 
work. And the Special Options table 
doesn't display this command. It may be 
that Radio Shack at one time was going 
to have a Save Files option, but later can- 
celed it and didn't catch this reference. 

Simple Investments 

The beginning investor or homeowner 
would probably find greatest utility in the 
first two modules tn the series. Basic In- 
vestment Analysis and Real Estate and 
Loan Analysis. Some of the calculations 
are quite elementary, so they give the low- 
est dollar value of the five programs. 

Basic Investments helps you calculate 
personal investment values: how much 
you must invest periodically to reach a 
specific goal: how much you can with- 
draw in equal amounts over a given time 
span: the interest rate you need to meet 
a specific goal: the rate of return on in- 
vestments with differing cash flows: the 
effects of continuous compounding: the 
current value of stocks and bonds: and 
present and future values of annuities. 
An accompanying chart shows earned 
interest over a period of time before and 
after taxes. 

The second module. Real Estate and 
Loan Analysis, lets you figure loan costs 
from every angle. You can calculate a 
loan amount from interest, time, and 
payment dmounts; payment amount 
from time, interest, and principal values: 
your final payment if you pay off a loan 
at any point in the payment schedule: 
time needed to pay a loan at certain in- 
terest and payment rates: and interest 
rates when you have time, payments, 
and principal data. 

You can develop amortization tables 
for a regular mortgage, as well as calcu- 
late adjustable-rate mortgage balloon 
payments. People planning a mortgage 
will like the comparison table, which lets 
you change the loan parameters and see 
how that affects the terms of the loan. 
For example, how much more interest 
will you pay as your mortgage goes from 
20 to 25 to 30 years? You can also figure 
the actual cost of any property, both 
monthly and total, including the taxes, 
insurance and utilities. 



The second 
module lets you 
figure the cost of 
property, both 
monthly and 
total, including 
taxes, insurance, 
and utilities. 



In typical loans, much of the early pay- 
ments goes to interest, not principal. 
This, of course, affects your tax return. 
Real Estate and Loan Analysis can cal- 
culate how much of your payments go to 
interest, using the Rule of 78s that banks 
use. It displays the interest for the 
month, accumulated interest, and inter- 
est still owed. 

Finally, you can do some rudimentary 
forecasting, based on past data and 
smoothed according to your specifica- 
tions. You can also print out bar graphs 
of your forecasts, with or without the 
smoothing constant. 

As in all the Money Decisions programs. 
you can internally pass the results of one 
computation to another section of the pro- 
gram. I used the program to figure the 
payment amount for a mortgage, then 
passed that result to another section to 
display amortization tables. 

Not for the Novice 

Money Decisions III and IV. Business 
Statistics and Forecasting and Business 
Management, are business financial pro- 
grams. The first of these is almost en- 
tirely devoted to statistical forecasting. 
You can determine risk-adjusted net 
present value, expected value of a future 
event, and average growth rate. You can 
calculate payoff matrix analyses. Baycs- 
ian decision analyses, regression anal- 
yses, moving average forecasts, 
exponential smoothing forecasts, and 
apportionment by ratios. 

A regression analysis, for example, 
forecasts a future item, such as sales, 
based on a past correlation between 
sales and advertising. You may choose 
linear, geometric, or exponential corre- 
lation, but you can't enter more than 24 
pairs of values. For each year, you would 
enter a Y value for sales and an X value 
for advertising. Unfortunately, you can't 
label variables in this or any other func- 
tion. You input and output data in terms 
of X and Y. and you must remember 
which is which. At the end. you may en- 
ter interpolated X values and see (he 
forecast in Y sales. 
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The Business Management module in- 
cludes the following business manage- 
ment functions: lease/purchase 
analyses; depreciation switches (from 
accelerated to straight line), rates, and 
amounts; salvage values; tax deprecia- 
tion schedules; equipment cost anal- 
yses; break-even analyses; linear cost/ 
revenue schedules; fixed and variable 
production costs: production cost sched- 
ules; production alternative cost com- 
parisons and profit/loss; job cost bidding 
analyses; optimal order and production 
quantities; inventory reorder and turn- 
over ratios; profit sharing; bonus effects 
on taxes; and forecasting bar graphs. 
This program, unlike the others, comes 
on two disks. 

The last program in the series. Ad- 
vanced Investment Analysis, is strictly 
for advanced investors. It includes cal- 
culations for items like future value 
(when payments and withdrawals vary), 
present value of a tax deduction (the de- 
duction being the interest on a loan), cur- 
rent value of a treasury bill (known face 
value, issue and maturity dates), ac- 
crued interest on bonds, and net present 
value (variable cash flows and periods). 

One notable function, called Financial 
Management Rate of Return, differs 
from standard internal rate of return cal- 
culations by taking into account the cost 
of financing. 

I think Advanced Investment would 
be highly useful for sophisticated inves- 
tors. Its functions allow syndicated in- 
vestment analysis, ratio analysis (of 
business financial situations), merger 
evaluation, leverage and earnings per 
share, and more. 

Documentation 

Each Money Decisions manual has the 
same layout. For each function, it ex- 
plains the calculation, prints the for- 
mula, and gives an example. I found the 
descriptions of the various financial con- 
cepts impressive: I understood and used 
previously unfamiliar ideas. 

The docs include a glossary, which de- 
fines all the terms, and a special section 
elaborating on concepts such as com- 
pounding, forecasting, and discounted 
cash flow. 

Conclusion 

The Money Decisions Series certain- 
ly covers the field in terms of financial 
computations. 

However, I was disappointed to find 
that all the modules cost $49.95. I have 
no argument with this price for the ad- 
vanced programs, but this seems steep 
for the Basic Investment and the Loans 
and Real Estate packages, which give 
you fewer useful functions for the 
money. ■ 



A Disk Zapper 
With a Difference 

by Mark Goodwin 

Hyperzap runs on the Models I and III 

(48K) and requires one disk drive. Hy- 

persoft, RO. Box 51155, Raleigh, NC 

27609. $49.95 

Easy to use: * * ft ft ft 

Good docs: • * ft ft ft 

Bug free: • • ft ft ft 

Does the job: * * ft ft ft 

Hyperzap is nothing new as a class 
of software— it's a Model I/III/4 
disk zapper — but it does offer some fea- 
tures unique to a utility of this type, in- 
cluding extended directory listings and 
a memory modification capability. Un- 
fortunately, Hyperzap's inadequate doc- 
umentation and confusing data entry 
requirements tarnish its glow. 

Hyperzap is versatile; it reads single-, 
double-, and mixed-density disks. In ad- 
dition, it automatically detects what 
brand of double-density board you have 



and adjusts the disk driver's operation 
accordingly (since I tested Hyperzap 
on a Model 4, 1 was unable to verify this 
feature). 

Features 

Hyperzap's main menu presents you 
with 18 command options (see Fig. 1), 
many of them standard for a disk zap- 
per: read and write disk sectors, read 
and format disk tracks, read address 
marks, position the head to selected 
tracks, and copy disks. 

Hyperzap does offer a unique directory 
mode, however (see Fig. 2). It displays se- 
quential sector numbers, logical track 
numbers, spare bytes' contained in the ad- 
dress marks, logical sector numbers, sec- 
tor length codes, data address marks, the 
memory address for the sectors' data, 
angular positions, type codes, sector 
densities, and good or bad CRC values. 

While in the directory mode, you can 
append sector entries; copy the current 
track entries to the next track; delete, in- 
sert, and edit sector entries; generate a 
standard track; edit sector data; read 
sectors into memory; change the track 
bytes; and write sector data to a disk. 

Continued on p. 124 



Screen 1 : * * * Command Options * * * 


Parameter Srce Destn 


A Read addr mrks 


XC Disk Copy 


Drive Number 


00 


01 


C clr Track Table 


B AutoBoot Disk 


No. of tracks 


40 


40 


D display Table 


Z Autopilot 


Steps/Track 


01 


01 


I inspect memory 


P Change Params 


Head at track 


00 


00 


J##jump@## 


+ Step & repeat 


Side 


00 


00 


S Read sectors 


T # seek track 


Size 5/8 inch 


05 


05 


Q Write sectors 


E comb. A,S,D 


Stepping rate 


01 


01 


R S/D read track 


H(elpful) facts 


Track offset 


00 


00 


W Format Track 


YX Quit & reboot 


Sector skew 


02 


02 


Hyperzap uses 


4300-8 1 6 1 Track/sector table 


9000- 


90A3 


Sector data 


9C00-9C00 Track buffer 


E700- 


-FFFF 


Autopilot 


9800-9800 P Screen Print 


Clear -- > 




Figure 1. Hyperzap's 


main menu. 







Screen 2: # 


Tk Sp Sc Ln 


CRC DM Data Ang. 


TYP CRC Den 


Physical > 01 


00 00 00 01 


Y 


FB 9C00 0673 


IBM Y S 


track 00 02 


00 00 01 01 


Y 


FB 9D00 4446 


IBM Y D 


Sector 










Table 










Total 02 










sectors 










Drive 00 










05 inch. 










Hyperzap uses 


4300-8161 




Track/sector table 


9000-90B9 


Sector data 


9C00-9E00 




Track buffer 


E700-FFFF 


Autopilot 


9800-9800 




P Screen Print 


Clear --> 




Figure 2. Hyperzap 


's directory mode. 
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TRS-80™ MODEL 1, 3, AND 4 
SOFTWARE 

Circle 175 on Reader Service . | 


TRS-80™ - TANDY- MS-DOS 
IBM - CP/M SOFTWARE 


TYPITALL Word Processor $ 1 29.95 
TYPITALL with Spelling Checker $ 1 79.95 

Word Processor upwardly compatible with SCRIPSIT — it reads your 
old SCRIPSIT files and uses the formatting and cursor movement 
commands you are already familiar with But it is a completely new word 
processor with so many advanced features that we can't even mention 
all of them here. 

Send any control or graphic/ special character to the printer Control/ 
graphic characters included In the text so that you have complete 
control of all features of your printer Print the formatted text on the 
screen before going to the printer. Send formatted text to a disk file for 
later printing. Merge data from a file during printing Names, addresses, 
and other text can be inserted dunng printing No need for a separate 
program for mail merge" capabilities Print while editing (spooling). 
Assign any sequence of keystrokes to a single control key. Call up to 
16 help screens at any time Move cursor forwards or backwards by 
character, word. line, or page Reenter the program with all text Intact 
if you accidentally exit without saving the text Optional spelling checker 
comes with 29,500 word dictionary. Verify a 3.500 word document in less 
than two minutes. True Model 4 [80 x 24 display. TRSDOS 6) and Model 
VIII versions 


SMALL BUSINESS ACCOUNTING $99.95 

Newly revised, this program is based on the Dome Bookkeeping 
Record #612, and handles general ledger and payroll for a small 
business Category breakdowns are provided for both income and 
expenses Monthly, through last month, and year-to-date summaries 
computed Start the fiscal year with any month. 

Payroll section handles up to 99 employees Automatic computations 
for F.I.C A. federal and state income tax. Three optional deductions also 
included Print both payroll and expense checks using same forms Reports 
include monthly, guarterly and year-to-date summaries, 941 and W-2 
forms Simple and easy to learn — ideal for first-time computer users. 


HOME BUDGET and 
CHECKBOOK ANALYST $59.95 

A complete checkbook program together with budgeting, income and 
expense analysis, comparisons, and projections. Enter and print checks, 
enter deposits, and compute your current checking balance Program also 
handles non-check expenses, bank debits, and income Monthly and 
year-to-date summaries and yearly projections based on data through a 
known month Monthly expenses compared to a pre-established budget. 


SYSTEM DIAGNOSTIC $99.95 

Is your computer working correctly? Are you sure? System Diagnostic 
has complete tests for every component of your TRS-80 Model 1, 3. or 4 
(separate versions necessary for each model| 

ROM: checksum test RAM: three tests including every location and 
data value Video display: character generator, video RAM. video signal. 
Keyboard: every key contact tested Une printer character tests with 
adjustable platen length. Cassette recorder read, wiite. verify data. 
Disk drives: disk controller, drive select, track seek, read sectors, 
formatting, read/write/venfy data with or without erasing, disk drive 
timer, disk head cleaner Single or double density, 1 -99 tracks RS-232-C 
Interface: connector" fault, data transmission, framing, data loop, baud 
rate generator 


MAILING LIST $69.95 

Build and maintain mailing lists of up to as many names as you can fit 
on standard diskettes 1 1 .250 for TRSDOS and CP/M. 2.500 for MS DOS) 
Four- line labels with optional line that can be used either for unpnnted 
data or as part of the label Add. change, delete, or find names Sort accor- 
ding to data in any field Print labels in 1.2. 3. or 4 adjustable columns 


SMALL BUSINESS 
MANAGEMENT SYSTEM $299.95 

A complete point-of-sale program for a small business Handles 
order entry. Invoicing, Inventory, and bookkeeping, including 
general ledger, accounts receivable, and accounts payable Includes up 
to 999 8-character part numbers Items deducted from inventory when 
orders entered Handles both customer accounts and single orders 
Invoices printed on forms or plain paper and include discounts, sales 
taxes, and shipping and handling charges General ledger produces 
monthly and year-to-date totals. Receivables tracked to invoices, 
automatically updated as income entered. Inventory reports track sales by 
part numbers 


SMART TERMINAL $74.95 

The Intelligent telecommunications program for your TRS-80 Model 
1, 3, or 4, or Model 2 CP/M Memory buffer for sending and receiving 
files Automatic transmission of outgoing data. Automatic storage of 
incoming ddtd Character translations. True BREAK key. Help screens, 
line feed filters, echo and line printer toggle switches, and more 


TRS-80™ MODEL III 
ASSEMBLY LANGUAGE $16.95 

A complete course m assembly language, written for the beginner. 
Contents include The Z-80 instruction set. TRS-80" Model III ROM and 
RAM. using the Editor/ Assembler reading, printing, and moving data, 
arithmetic operations with integers, floating-point and BCD numbers, 
logical and bit operations, cassette input and output; USR subroutines in 
BASIC: RS-232-C data communications, disk input and output; the 
TRSDOS 1 3 disk operating system. 










HOWE SOFTWARE 

1 4 Lexington Road 
! New City, New York 1 0956 

Information and same day orders: 

(914)634- 1821 

24-Hour TOLL-FREE Order Number 
Outside Ciiifomij call 

(800)428-7825, ext 169 

Insxde California call i 

(800) 428 - 7824, ext 1 69 

\X/hen ordering, please give your computer model number j 

Terms checks Viv* Mastei Card or COD \ 

Shipping and handling SJ-'X' CirvxJa Me mco. Hawaii $600 ! 

Arc rn<jil overseas S 1 7 00 Ntw >i >rtr residents ddd sales tax | 

• TFS SO f, ., tMrVrrurt ,( • , rv +, r"nrp , 


MONITOR #5 $22.95 
Book and MONITOR #5 $29.95 

A comprehensive machine language monitor and debugging 
program Display memory in ASCII or heaxdecimai format Disassemble 
memory to show machine language commands Move and compare 
blocks Search and modify memory Relocate machine language 
programs. Read and write cassette tapes. Unload programs in low RAM 
on disk. Print optionally on video display or line printer Save and load 
disk files Input and output of disk sectors, bypassing disk operating 
system Complete debugging package, including setting and 
displaying registers, single stepping through machine instructions, 
setting breakpoints, and executing machine language operations. 
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MONTE'S TOOLKIT $49 

REQUIRES: Montezuma Micro CP'M ! 2.2 version 2.2H 

Monte's Toolkit is a collection of utilities that will prove useful to every owner of Montezuma Micro CP/M (you all are owners, aren't 
you?). It's a disk full of programs that perform functions that are difficult, cumbersome or expensive to do any other way. Monte nas 
tried, in his own way. to briefly explain each function for you below. Read on and be saved. 



DOUBLECROSS" allows unlimited file transfers between CP/M". 
IBM-DOS and Model 3/4 LDOS" /TRSDOS*- with unsurpassed 
ease and speed. In fact, you can move just about anything from any 
disk to any other disk but you might have to make changes for pro- 
gram operation. Lotus 1 23 ' just flat won't run on your Model 3 and 
I doubt that you could ever modify Scripsit* enough to run on the 
IBM. Simple menus guide you through the operation with minimal 
keystrokes. Just tag the files you want in the directory display and 
go. You won't get doublecrossed with DBLCROSS. 

FREEFORM* formats and backs up Model 3/4 LDOS/TRSDOS and 
IBM MS & PC- DOS (versions 1 .x. 2.x and 3.x). both single side and 
double side plus there is a special clone copy when you just don't 
know or care what you have. Just insert a disk and copy away. All 
you have to know about the disk is how to get it into the drive. The 
Analysis feature lets you look at and print the actual structure of a 
disk - even the ones with funny' formats. 

WSPR lets you print to almost any printer using almost any control 
code. It's nearly magic and does a whole lot more than I can talk 
about here including letting you print anything your printer can print. 



FILEFIX'- gives you the ability to fix' your files' by adding line- 
feeds when your files are going from CP/M or IBM-DOS to LDOS/ 
TRSDOS or take them away if you are transferring the other way. 
You can remove the control codes from a WordStar document 
thereby converting it to a non-document file. The fix will also fix up 
Scripsit files so they can be used by CP/M and IBM-DOS based 
wordprocessors (you know - the real ones) All this is accomplished 
with the use of simple menus and boy, it is fast. 

SYS2M requires 128K and our CP/M. The CCP and the BDOS are 
moved to drive M and the BIOS is modified to allow a Warm Boot 
from Drive M. So what you say. Well, you still have to have a disk 
in drive A but it no longer has to have the CP/M system resident. It 
can be anything. This little jewel copies frequently used programs 
to drive M and searches there first for all program requests result- 
ing in much faster program loading. Slick isn't It? 

AUTO is a little goodie that lets you issue multiple commands from 
the command line Eliminates the pain of Submit. As in all the other 
parts of MONTE'S TOOLBOX, complete and comprehensive in- 
structions are included and it's available right now. 
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MONTE'S WINDOW 




A touch or the keyboard opens a window in your screen lor - 
a Note Pad. an Appointment Calendar a Calculator, even a 
Mini Data Base. All yours tor iust S49! Need RAM -7 Monte's 
Christmas gift to you - 64K and the window, both for $99! 

Once Upon A Time. 

Monte Zuma. our Founder, President and King has always had trouble keeping his desk 
organized The Sidekick" trow Borland International would solve the problem, but alas, it 
was not available tor CP/M' So Monte asked his favorite nephew, the legendary LaMont 
C. Zuma (distant cousin to Rondo Talbot, a direct descendant ol Monte Zuma hisselt) to 
work on the problem as best he could during recess at the home LaMont. a true legend in 
his own time, really outdid himsell this time A touch ol both shilt keys halts your 
application program m its tracks and up pops Monte's Window" ready to use What 
could be simpler'' Put an end to the tumbling and pawing around the pile ot papers on your 
desk You will tmd Monte's Window" indispensable When you are finished, break back 
to your application program and it resumes without error Monte's Window" <s fru'y a 
breakthrough. See lor yourself - Look through Monte's Window' on your Model 4 How 
did you ever get along without It? See the page opposite tor order information Monte's 
Window* is available right now 
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MONTE'S BASIC 

Your TRSDOS BASIC (01.01.00) will work the same, 
for the most part, under CP/M as it does under 
TRSDOS. However, for the most part isn't good 
enough. But. with some changes provided by our 
BASCON" program, you can be 1 00% compatible with 
the standard BASIC used with CP/M. True, you lose 
some of the TRSDOS BASIC features while gaining 
new features such as FILES. NULL, RESET, etc. BAS- 
CON alters your TRSDOS BASIC, which was included 
with your Model 4 when you bought it, so that it will 
function under CP/M. You must have the unaltered 
original TRSDOS BASIC as above in order to convert 
with BASCON. The program operation is fully auto- 
matic and quick. The resulting BASIC runs any CP/M 
2.2 BASIC program that previously required 
MBASIC . Programs written for TRSDOS BASIC may 
require modification to run correctly under the con- 
verted BASIC. Fully compatible with MBASIC. We 
even provide for additional documentation that is 
keyed by page number to your TRSDOS BASIC man- 
ual. MONTE'S BASIC is available right now. A jq 

' Copyright 1985 by Montezuma Micro All Rights Reserved t^ ^^ 
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CP/M . . .The Software Key 
That Unlocks Your Model 4 

CP/M is the standard 8-bit Z-80 operating system and many thousands of programs have been written to run under this 
system. With Montezuma Micro's CP/M you can run these programs on your Model 4/4P. Think about all those nationally 
known programs you've wanted to use. Programs like WordStar, dBASE II; SuperCalc; MultiPlan etc. With our version of 
CP/M 2.2 all those public domain programs on bulletin boards across the USA are available for free downloading. CP/M is 
the missing link that joins all this software to your Model 4/4P. Montezuma Micro'sCP/M comes ready to use and requires 
no hardware modifications. This product has been awarded the best and highest ratings in the reviews and we are 
continuously improving it with you in mind. With our CP/M you get more than just a DOS. You get the other half of your 
Model 4/4P. 

AVAILABLE NOW FOR IMMEDIATE SHIPMENT- Less Hard Disk Drive Support $169 

Optional Hard Disk Drive Support $ 30 

(Radio Shack 5M. 12M, 15M, 35M • Aarocomp/P»rcom 5M, 10M. 15M. 30M • Bi-Tech 5M, 10M, 11M, 15M, 20M, 30M. 40M) 



FEATURES 

• Full range of floppy drive support. Dual-head and/or 80 
tracks. 

• Optional hard disk support allows positioning and selective 
assignment of logical drives. Easy backup routine. 

• Memory drive allows the use of the other 64K RAM bank 
on 1 28K machines 

• Modem 7, a powerful public domain communications 
program furnished at no charge, allows for file transfer and 
remote database access such as CompuServ and The 
Source. 

• CONFIG is our flexible utility that allows complete control 
of all operating parameters from menus. Format, read and 
write more than 30 different manufacturer's disk formats 
with more being added rapidly. 

• Disk Utility Program allows fast format, backups and 
verifying of ours and other manufacturer's disks. 

• These CP/M utilities are included: ASM; DDT; DUMP; ED; 
LOAD; MOVECPM; PIP; STAT; SUBMIT; SYSGEN; and 
XSUB. 



WHY BUY OURS? 



Transient Program Area (TPA) 
Bytes free in M BASIC 
Bytes free of formatted disk 
64K Memory drive 
Double-Side/80tk drive support 
Format, read/write other 
CP/M formats 

Communication program included 
Share HD with TRSDOS/LDOS 
Assign multiple drives to HD 
Boots from Hard Disk (4P) 
Popular terminal emulation 
User defined function keys 
Timely product support 
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MICRO 

55K 
30,776 
196K 
YES 
YES 

YES 
YES 
YES 
YES 
YES 
YES 

9 
YES 



RADIO 
SHACK 

52K 
18,488 
160K 

NO 

NO 

NO 
NO 
NO 
NO 
NO 
NO 
3 
NO 



128K MEMORY UPGRADE 

Our upgrade kit includes 64K RAM, a geniune PAL chip and instructions 
for installation. This kit will upgrade your 64K Model 4 to 128K and 
allow the use of our MEMLINK program and the TRSDOS 6.x 
MEMDISK. Guaranteed 1 year. 

A BARGAIN AT ONLY $74 Model 4 
$64 Model 4P - No PAL 



This popular software is available for the Model 4/4P 
using our CP/M. 

WordStar Fast memory-mapped version 3.3 $250 

MailMerge Multi-purpose file merging program ... 125 

SpellStar 20,000 word proof-reader on a stick 125 

Starlndex Creates indices and Tables of Content. . . 85 

DataStar Data entry and retrieval is yours 175 

ReportStar Report generatorand file manipulator 1 50 

InfoStar The above two programs 300 

dBASE II with Disk Tutorial 385 

CBASIC version 2.8 85 

TURBO PASCAL by Borland. This is the one 45 



ORDER INFORMATION 

Call now and your order will be shipped immediately. We accept 
American Express, MasterCard and Visa plus we ship COD (cash or 
cashier's check only). Credit cards are not charged until your order is 
shipped. Add $4 shipping per item on orders within the 48 states. 
Suitability of the software is the responsibility of the purchaser as 
there are NO REFUNDS. Defective items will be replaced upon their 
return, postpaid. 



ORDER NOW . . . TOLL FREE 

800-527-0347 
800-442-1310 

The To* Free lines are for orders only 
Specifications subject to change without notice 



CP/M is a Trademark of Digital Research Inc., Interchange and Memto* are Trademarks of Montezuma Micro TRS-80 is a Trademark of the Tandy Corporation WordStar MailMerge SpellStar 
Starlndex InfoStar. ReportStar. DataStar SuperSort and CalcStar are Trademarks of MicroPro International Corporation Muttiplan is a Trademark of Microsoft 
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2l*-339-5104 

Redbtrd Airport. Hangar # 1 8 

P.O. Box 32027 

Dates. Tx 75232 

' WE KEEP YOU RUNNING 
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Born to Run 



From its inception, C was developed as an unfettered and transportable language; one 
C program works unaltered on a number off computer systems. JOHN B. HARRELL III 
gives you the lowdown and describes its structure and commands. 



he babble of languages available 
for microcomputers makes it hard 
for a programmer to decide on something 
new. If you're not satisfied with Basic, As- 
sembly, or Pascal, or if you're curious 
about other languages, I encourage you to 
explore C. 

I'm not an expert in C, but I've reviewed 
three exceptional compilers and have 
gained a real fondness for the language. In 
this article. I'll introduce some of the con- 
cepts that led me to accept C so readily. 

A History Lesson 

C was developed as a system program- 
ming language for the Unix operating sys- 
tem on a PDP-11 minicomputer. The 
objective was to give the programmer 
power comparable to Assembly lan- 
guage's without Assembly's tediousness. 
C was also designed to be portable among 
a variety of computer systems. The most 
outstanding example of its power and ver- 
satility is Unix itself: Some 90 percent of 
it is written In C. Unix would not be imple- 
mented on so many computers had it 
been written in another language. 

You can best classify C as a medium- 
level language. Its sophisticated control 
structures and neat, compact notation are 
similar to those of PL- 1 , Pascal, and Algol. 
However, it lacks many of those lan- 
guages' features, such as string and data 
storage manipulation, and advanced in- 
put and output facilities. 

This weakness is also C's greatest 
strength. It is relatively uncluttered yet 
has what you need to manipulate data, 
much as an assembler does. Thanks to C's 
minimal structure, a compiler can gener- 
ate highly efficient code. In fact, compilers 



on the market today produce better code 
than most programmers are capable of. 

First Words 

C is a language of symbols. On first 
sight, a complex program is enough to 
make you swear you'll never C. Programs 
comprise functions, each of which per- 
forms a unique task. Each program must 
have a main function, which is the first 
part of the code that executes. The stan- 
dard first example of a C program displays 
the phrase "hello, world": 

main( ) 

{ 

printf("hello, world\n"); 

} 

The MAIN( ) statement denotes the 
function the operating system will Initial- 
ize. The function body starts with a left 
brace and ends with a right brace. C uses 
shorthand notation: what could be easier 
than typing in { and } instead of Begin and 
End. as you do in Pascal or Algol? 

The PRINTF statement is a library 
function that instructs the computer to 
display the string on the standard output 
device. The \n character is C notation for 
an end-of-line character (other common 
characters also have special C notations). 

Before I move on to a more difficult ex- 
ample, look at Figs. 1-3. Figure 1 lists C's 
reserved words. Figure 2 lists some com- 
mon functions a C compiler includes in its 
standard library. These generally accepted 
Unix equivalents add all the required func- 
tions to the language. Figure 3 describes C's 
operators — the real power of the language. 
Using them, you can perform a complex 
operation in a single statement. 

In C. identifiers are composed of letters 



and numbers. You must make an identi- 
fier's first character a letter, however. 

C is case-sensitive. For example, iden- 
tifier "abc" differs from "ABC." You must 
put all reserved words in lowercase. It's 
convenient to type in all identifiers and re- 
served words in lowercase, reserving up- 
percase for symbolic constants in macros 
(I'll discuss this later). 

Learning to Type 

C supports several data types, which 
generally conform to the basic units of 
computer physical structure such as 
bytes, words, or double-words. 

The smallest unit of storage is "char," 
typically a byte long. It can hold one char- 
acter, and will hold all members of the 
computer's character set. Characters can- 
not have a negative value. 

The next unit of storage is an "int." or 
integer value. On a typical microcompu- 
ter, this value is a l"6-bit word. You can 
modify an int with "short" or "long" to 
denote decreased or increased precision 
(and storage allocation). 

You can also designate an integer value 
as unsigned, which makes the compiler 
treat the number without regard to sign. 
For example, a normal integer value on 
the IBM PC will typically represent values 
from - 32.768 to 32,767. An unsigned In- 
teger can assume values of zero to 65.535. 

C also supports operations on floating- 
point numbers such as 6.023 x 10 23 . Sin- 
gle-precision numbers are called "float" 
and double-precision values are called 
"double." For many microcomputers, 
float values will have six to seven digits of 
precision and double values will have 
about 15 digits of precision. 



The ABCs of Storage 

The default storage class is "auto- 
matic": that is, a program automatically 
allocates variables whenever it executes a 
function and removes them when the 



function ends. Automatic variables don't 
retain their values from one execution of 
the function to the next. 

You can also classify automatic vari- 
ables as "register" variables, with some 
restrictions. This tells the compiler to gen- 
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Name 


Description 


double atoflcpl 
int atoi(ep) 
long atol(cp) 


String to double, integer, or long integer con- 
version. 


float val, but. pree. type) 


Converts from double-precision number to 
char in a specified format type and precision. 


(lose(fd) 
felose(strearn) 


Close the file or device pointed to. 


open(fd) 
fopen(stream) 


Opens the file or device for input and/or output. 


read(ld.bui.bufsize) 
writ e( fd . bu f, hi i fsi ze) 


Unbuffered input and output functions. 


fread(buf.slze.cnt.str) 
fwrite(buf.size.cnt.8tr) 


Buffered binary file input/output. 


Iseeklstr. offset, origin) 
Iseeklfd. offset, origin) 


Reposition a stream or file. 


gctr(strcam) 
gctcharf ) 


Get next character from an input stream or 
stdin. 


gets(s) 
fgets(8,stream) 


Get a string terminated by a new line charac- 
ter from sdtin or specified stream. 


loetl(fd.emd.stty) 


Set or determine the mode of the console. 


char *maIloc(sizc) 
char •calloc(nelcm.sizc) 


Dynamic memory allocation functions. 


priritf(lmt.[arg]. . .) 
fprintf(str.fmt,[arg]. . .) 


Format print output to stdout or the specified 
stream. 


sprintf(buf.fnU.(arg]. . .) 


Format print output to the specified buffer. 


putc(cstream) 
putcharl 1 


Put a character to the specified stream or 
stdout. 


puls(str) 
Iputs(str.strcam) 


Put a character string to stdout or the speci- 
fied stream. 


seanf(tmt[,ptr]. . ) 
fscanf(str,fmt(,ptrj. . .) 


Scan stdin input or the specified stream and 
convert text under format control. 


sscani(bul.imt[.ptr]. . .) 


Scan buffer: convert text under format control. 


char •strcat(sl.s2) 


Concatenate two strings. 


strempfs 1 ,s2) 


Compare two strings and return result. 


char *strcpy(sl.s2) 

strlen(s) 

char •index(s.c) 


Copy string s2 to s 1 . 
Return string length. 
Find first occurrence ol character in string. 


touppcr(e) 
tolowertc) 


Converts character e to the designated ease. 


Figure 2. Partia 


/ list of C standard library functions. 



erate code that maintains these values in 
the computer's registers as long as possi- 
ble. The program therefore executes faster 
by using the registers more efficiently. 

Sometimes you want variables to retain 
their last values from one function execu- 
tion until the next. You do this by declar- 
ing the variables as "static"— the compi- 
ler will reserve permanent space for them. 
This might speed up a program by reduc- 
ing the overhead it takes to allocate and 
deallocate variables automatically. How- 
ever, static variables can prevent the code 
from being reentrant and recursive. You 
need reentrant code if your program is to be 
"burned" Into a read-only memory (ROM). 

Variables can also be "extern," or ex- 
ternal, to the function declaring them; the 
current function block uses them but you 
define them in some other module. The 
extern attribute reserves no space in the 
module where you declare the variable as 
external. 

Control Structures 

The most important control feature in 
C is the block, a group of statements en- 
closed In braces { }. These statements 
(and declarations, too) become one logical 
statement. I'll use "statement" to mean a 
single statement or block. 

Probably the most common decision 
statement is If. . .Else, which has the syntax 

if (expression) 

true-statement ; 
else 

false -statement; 

where "else" is optional. If the result of the 
expression Is true (or nonzero), the pro- 
gram executes "true-statement"; other- 
wise, it executes "false-statement." 

Like Pascal, C executes a set of state- 
ments until a condition is met in two 
ways: While and Do. . .while. The differ- 
ence is that a While statement tests the 
expression before executing. Do. . .while 
always executes the statement at least 
once. Their syntaxes are: 

while (expression) 
statement: 

and: 

do 

statement; 
while (expression): 

A closely related control statement is 
For, which has the syntax: 

for (exprl; expr2: expr3) 
statement; 

The For statement evaluates exprl as an 
initializing expression for the loop. Then 
it evaluates expr2 and tests it. If that value 
is true, the program executes the state- 
ment. It next evaluates expr3 (normally 
the incremental value for the loop) and re- 
peats the cycle. 

C also provides a multipath decision 
statement, similar to Pascal's Case state- 
ment, called Switch, that evaluates an 
expression and tries to match it to one of 
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y Basic interpreter. C Trainer 
(see Program Listing 1). will 
give yon an idea of what C is all about 
without having to buy a C compiler. It's 
not very powerful, but it will run the C 
routines 1 provide. You can also write 
your own little C programs with it. 

You create your C source program in 
Basic or with a word processor, saving 
the program in ASCII format. In Basic, 
you produce left and right braces, re- 
spectively, with the clear/shift/ < and 
clear/shift/ > keys, and the backslash 
with the clear/slash combination. 

You can include program comments, 
but be aware that they will strain the ca- 
pabilities of C Trainer and increase the 
amount of garbage collection. I find that 
programs without comments run 20 to 
30 percent faster than those with. 

Once you save your C program, run C 
Trainer and enter the name of your 
source file. After C Trainer loads the pro- 
gram, it automatically forces string gar- 
bage collection. If you don*t want this, 
delete line 2480. You'll avoid a delay, but 
for some programs you'll just postpone 
it until some time during execution. 

Be patient when C Trainer executes a 
program. The interpreter, since it is in Ba- 
sic, works slowly. It might even appear at 
times to hang up. Just give it a little extra 
time before hitting the break key. 

C Trainer only supports the integer 
type, and not pointers, arrays, or user 
functions. It can only interpret a MAIN!) 
procedure. I did. however, implement 
the standard library functions PRINTF. 
PUTCHAR. and GETCHAR. so that you 
can have limited input and output from 
the C program. PRINTF allows the %d 
options to print integers, and PUTCHAR 
requires an integer argument. (For PUT- 
CHAR. the argument is the number 
whose CHRSO you want to print.) 



by Daniel Zenzel Jr. 

A C interpreter— 

and seven simple programming 

examples— get you started with C. 

Write Away 



The Figure summarizes the C con- 
structs that C Trainer supports, with 
their required formats and restrictions, 
The sample programs in Program List- 
ings 2-8 give examples of the PRINTF 
and PUTCHAR/GETOHAR (unctions 

As for arithmetic. 1 implemented simple 
expressions only. This means that only 
simple assignment and addition, subtrac- 
tion, multiplication, division, incremen- 
tation (i + + ). and decrementation (i — ) 
will work. This should be enough to at 
least get an idea of how C works. 

If C Trainer encounters any syntax cr- 



rors. the interpreter will usually display 
an error message and stop. This means 
that all errors in a C program are fatal. 
At this point you should load your C pro- 
gram back into Basic and correct the er- 
ror Some of the error messages aren't 
the best, but vou can easily modify the 
code to display what you want. 

A little tip: When an error stops the in- 
terpreter, the variable FPOS contains the 
relative byte In the source program that 
was executing when the error occurred. 
Also, the string array CPROG$0 contains 

the entire (' program. You can easily in- 



For loops: for (varl = var2; varl < = var3; varl + +) 
The comparison must be < = 
The initializer must be = 
The increment must be + + 
Nesting of For loops is not allowed 
You can have a While nested in 
A single statement or block is OK 

While loops: while (var OP var2) 
Comparisons OK are < , > , = = .! = 

Var must be variable name 

Var2 can be either number or variable 

Single statements or blocks are OK 

While loops cannot be nested 

You can nest a For into a While 

If. . .Else: if (varl OP var2) 

Comparisons OK are < , > , = = ,! = 

Varl must be variable name 
Var2 can be either number or variable 
Single statements or blocks are OK 
If statements cannot be nested 
You can use For or While in the If 

Arithmetic: var = varl OP var 2; var 3 + + , var 3 — 

OP is + .-./,* 

var 1 , var2 can be variable or numbers 

var, var3 must be variable name 

Figure. Supported C constructs. 
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Circle 401 on Reader Service card. 



ESSENTIAL 

TRS-BO PRODUCTS 

SUPERMOD4 



The Model 4 Super-enhancer. 

The one and only, world famous soft- 
ware system charges any model 3 
DOS with dozens of advanced powers. 
Model 3 DOS users can now take full 
advantage of all the Model 4's powers. 
80x24 screen, keyclick, print spooler, 
fast CPU speed (no disk errors!) and 
so much more. (And all using abso- 
lutely no memory!) 

The toughest critics describe it best: 
Lon Andrews, Computer Shopper, 
April '85 assures: 

"Does it work?? You bet!T 

David Dalton, 
80 Micro, 
Sept. '85 raves: 



hajy to lot? 


***** 


Good docs? 


***** 


Buf/rtt' 


***** 


Dots III* job? 


***** 



"SVPERMOD4 is the best one I've seen. 

"One ofSUPERMOD4's nicest features 
is its print spooler. It's the only [spooler] 
I've seen that's both useful and easy to 
use." 

"SUPERMOD4 has become almost as 
essential to me as my DOS." 

Own the system users worldwide say 
they can't do without. Only $49.95! 

(4P owners: inquire) 



SUPERDISK 



The Newdos/80 High-Power Ramdisk. 

The best. Use extra memory in your 
model 1 ,3 or 4 as a Super fast disk 
drive. The more memory you have, 
the larger the ramdisk. SUPERDISK 
accesses up to 1.5 megabytes of RAM, 
is extremely easy to use and is very 
versatile. Perfect for database users, 
BBS operators... anyone who's ever 
waited for a disk drive. Only $49.95 



SUPERMEM 



Millions of bytes of internal memory. 

Incredible! Expand up to 1.5 mega- 
bytes in the models 1 and 3, 1 mega- 
byte in the model 4. Dozens of popular 
programs now support this memory, 
including Intellitech's SUPERDISK. 
Even its price is incredible! 

Mem. board w/256K $269.95 

w 512K..S310.95 w 768K..S35I.95 w lmeg..S392.95 



SUPERSPEED 



Increase your model 4's speed. 

Old model 4's can run 5Mhz instead of 
the present 3.3Mhz max. New 4's can 
run 6Mhz instead of 4Mhz. 

Old 4 4p version. ...S49. 95 New 4 4p version... $79.95 



Hardware is easy to install. Specify computer 
model version, (old 4, new 4p etc.) 




re 



Intel litech Corporation 

21 Campbell Drive 

Dix Hills, New York 11746 

(516) 462-6970 



Term-, Irr 

iin Mir\ i in I 



em -checks or 

1 inquire foreign r 



dcx into this array to display the section 
yon had a problem with by using direct 
Baric commands. 

Finally. I've documented the source 
code, so you can modify it to support dif- 
ferent features.! 

You can write to Daniel Zenzel Jr. at 
P.O. Box 936. Berwick. PA 18603. 



System Requirements 

Models 4 and lOOO 

64 K RAM 

Basic 



Program Listing I. C Trainer Interpreter. 



CTrainer 



Daniel Zenzel, Jr. 



August, 1985 



This program will interpret a very small subset of the C Language. The 
input for this program is a C program, created using the standard BASIC 
editor, that was saved with the ASCII option (save "fname",a). This 
interpreter is by no means complete, or for that matter, it does not 
follow the K and R standardization of C. 

Its purpose is to merely demonstrate the use of the C language as an 
alternative to BASIC, and give one a chance to 'play' with C, in its 
simplest form. 
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100 
lie 

120 
130 
140 
150 
160 
170 
180 
190 
200 
210 
220 
230 

240 DIM CPROGS (15 00). FUNCTION. NAMES! 5 ),FUNCTION.LOC%( 5) , VAR. NAMES (20) , 
VAR.INT%(20) 

250 CLS: PRINT iPRINT-CTrainer - A 'C- Language Interpreter By Daniel Zenzel, Jr 

" : PRINT 

260 INPUT "Enter Source File Name »";CFNAME$ 

270 GOSUB 2310 

280 PRINT "Interpreting Program...." 

290 ■ 

300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 • 

550 ' At this point, we should be at the symbol MAIN(), to start the program 
560 "■—— ~~"————~— —"■■■——————— —"-~———— ————— ■——•-———————•.. ^_______..________ 

570 GOSUB 1820:GOSUB 1820:GOSUB 1820: • get to the first statement 

580 WHILE (T0KEN.VAL5O")") 

590 GOSUB 1820: ' Get statement token 

600 IF TOKEN. VAL$-"WHILE" THEN GOSUB 3570: GOTO 620 

610 IF TOKEN. VAL$-"PRINTF" THEN GOSUB 650 ELSE IF TOKEN. VAL$«"PUTCHAR" THEN GO 

SUB 900 ELSE IF TOKEN. VAL$-"FOR" THEN GOSUB 2580 ELSE IF TOKEN. VAL$«"IF" THEN GO 

SUB 3140 ELSE IF TOKEN. VALS-'INT" THEN GOSUB 1210 ELSE IF TOKEN. TYP-1 THEN GOSUB 

1440 
620 WEND 

630 PR I NT: PRINT: PRINT "CTrainer - Done" 
640 END 

650 ' 

660 ' Routine to handle the printf statement. On entry, fpos will point to 
67 ' the left paren of the function call. 

680 ' 

690 WHILE CPROG$(FPOS)<>"(" :FPOS-FPOS+l :WEND 

700 WHILE (CPROGS (FPOS) <>CHR$ (34)): FPOS - FPOS + 1:WEND: FPOS - FPOS + 1 

710 B$-"": WHILE (CPROGS (FPOS) <>CHR$(34) ): IF CPROGS(FPOS) <> "\" THEN B$ - B$ 

+ CPROGS (FPOS) : FPOS » FPOS + 1: GOTO 740 

720 FPOS - FPOS + 1: IF CPROGS(FPOS) - "n" THEN B$ - B$+CHR$(13): FPOS - FPOS + 

1 : GOTO 740 ELSE IF CPROGS(FPOS) - "t" THEN B$-B$+CHR$ (9) : FPOS - FPOS + 1 : GO 

TO 740 

730 IF CPROGS (FPOS) - "x" THEN FPOS - FPOS + 3 

740 WEND 

750 IF CPROGS (FPOS)- CHRS(34) THEN FPOS - FPOS + 1 

760 CDt-INSTR(B$,*%d") 

770 WHILE CD%<>0 : GOSUB 1820: GOSUB 1820 : ' get comma and identifier 

780 IF TOKEN. TYP <>1 THEN PRINT "Printf Syntax Error":ST0P 

790 CLI-TEMPVAR.COUNT+GLOBAL. COUNT: WHILE VAR. NAMES (CL%) OTOKEN.VALS: CL%»CL%-1 

: WEND 

800 B$ - LEFTS(BS,CD%-1)+STRS(VAR.INT%(CL%))+RIGHTS(BS,LEN(B$)-CD%-1) 

810 CD%-INSTR(B$,"%d") 

820 WEND 

830 GOSUB 1820: ' consume the closing paren 

840 PRINT B$; 

IJsting 1 continued on p. 130 



' This code processes global declarations and function declarations 

TOKEN. VALS="": GOSUB 1820 
WHILE TOKEN. VALSO'MAIN* 

IF TOKEN. VAL$<>"INT" THEN 420 
WHILE TOKEN. VALSO'f" 

GOSUB 1820: GLOBAL. COUNT - GLOBAL. COUNT + 1 
VAR . NAME S ( GLOBAL . COUNT ) -TOK EN . VAL S 
VAR. I NT%( GLOBAL. COUNT) - 
GOSUB 1820 
WEND 
GOTO 520 
IF DELIMS <> "(" THEN PRlNT'Function Declaration Expected": STOP 
FUNCTION. COUNT - FUNCTION. COUNT + 1 
FUNCTION. NAMES (FUNCTION. COUNT) - TOK EN. VAL $ 
FUNCTION. LOC% (FUNCTION. COUNT) - FPOS-LEN (TOKEN. VALS) 
WHILE TOKEN. VALS <> *{": GOSUB 1820: WEND 
BC%-1 

WHILE (BC%<>0) 
GOSUB 1820 

IF TOKEN.VALS-"{" THEN BC%-BC%+1 ELSE IF TOKEN. VALS-" ) " THEN BC%«BC%-1 
WEND 

GOSUB 1820 
WEND 






the following constant values. If It finds a 
match, the program executes the state- 
ment associated with this constant. The 
following example demonstrates the 
Switch statement: 

switch (input_ch) { 

case * A' : statement- 1 : 



Operator 

I ) 



case 'B': 



default: 



break; 

statement-2; 
break: 
statement-3: 



} 



Switch evaluates the integer expression 
in parentheses and tries to match it to one 
of the values indicated in the case labels. 
If it finds a match, the program continues 
with the statement associated with that 
case label. If it doesn't find a match, the 
statement associated with the default la- 
bel executes. 

The Break statement shunts program 
execution to the end of the block. Unlike 
other similar implementations, the switch 
program flow begins executing on the first 
match and the program will continue un- 
impeded to the end of the block. You use 
the Break statement to force execution of 
only those statements associated with the 
selected case label. 

While Break forces the program imme- 
diately to exit the program control block 
containing it, this might not be what you 
want. To skip the remaining statements in 
the block but continue with the loop until 
the conditions for termination are satis- 
fled, use the Continue statement. 

Since C is a structured language, you 
can write most programs without GOTO 
statements, but C's GOTO label statement 
is there when you need it. 

C in Action 

Now for some simple programs. My first 
example uses a standard library function 
to copy all data from the keyboard to the 
screen: 

main( ) 

{ 

lntc: 

while ( (c - getcharO) ! = -1 ) 
putcharfc); 

} 

Note the expression in the While state- 
ment. The program gets a character, as- 
signs it to the variable c. and tests the result 
to see if the program detected an end-of-file 
( - 1) indicator. If not, the program sends 
the character to the standard output de- 
vice using the PUTCHAR function. 

This is an example of the shorthand no- 
tation C allows. Why would this program 
be useful? MS-DOS supports command- 
line redirection of console input and out- 
put from and to other devices or files. If 
your DOS doesn't support this feature, 
most run-time packages supplied with 
commercial C compilers do support it. 
You could use this simple routine, for ex- 
ample, to copy a file to the video or printer. 

Now look at the more complex example 
in Program Listing 1. Count. This brief 



(type) 

si/cot 

I 
% 



< < 

> > 

< 
> 

< = 

> = 



&& 



CV:'C2.C3 



Description 

Array subscripting. 

Reference to a structure element using a pointer. 
Reference to a structure element by structure name. 
Function calls. 

Unary " used as a pointer reference. 

Unary & used as an address relerence. 

Unary negation (two's complement). 

Unary logical negation (.' expr yields 1 if expr is false and if true). 

Unary ^ yields a one's complement of its operand. 

Increment operator. If used before the operand, it is incremented 

before use: if used after it. it is incremented after use. 

Decrement o[>erator. If used before the operand, it is decremented 

before use: if used after it. it is decremented after use. 

Cast o|>erator. Used to force the conversion of its operand to the 

specified data type. 

Returns the size of the operand in bytes. 

Multiplication: a • b. 

Division: a / b. 

Modulus: a % b yields the remainder of dividing b into a. 

Addition: a + b. 
Subtraction: a - b. 

I-eft shift: a < < b shifts a left by b bits. 
Right shift: a > > b shifts a right by b bits. 

lcsts for a < b and returns truth value. 

Tests for a > b and returns truth value. 

Tests for a < = b and returns truth value. 

Tests for a > = b and returns truth value. 

Tests lor a = b and returns truth value. 
Tests for a < > b and returns truth value. 

Bitwise And operator: a & b. 

Bitwise Exclusive Or operator: a A b. 

Bitwise Inclusive Or operator: a | b. 

Logical And operator: a && b. Left-to-right evaluation is guaranteed 
and the second operand is not evaluated if the first operand is false. 

Logical Or operator: a || b. Left-to-right evaluation is guaranteed 
and the second operand is not evaluated if the first operand is true. 

Conditional operator: if expression el is true then the result is 
expression c2 else the result is expression e3. 

Expression assignment operator: a = b. 

This and the following operators perform assignment of the expres- 
sion following them to the left-hand value after performing the op- 
eration designated. For example: a op = b is equivalent to writing 
the expression as a = a op h. 



1 = 
% = 
<< = 
> > = 
& = 



Two or more expressions separated by the comma are evaluated 
left-to-right and the result of the overall expression is the evaluation 
of the right-most subexpression. 

Note: The operators are grouped in descending order of precedence. Opera- 
tors have equal precedence within their group. 

Figure 3. C's operators. 
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program will read from the standard input 
until it detects an end-of-file marker 
(EOF). As it reads, it counts characters, 
words, and lines in the text. When it finds 
the EOF, it displays these totals. 

The statements beginning with the # 
character are called preprocessor state- 
ments and direct the compiler to perform 
specific actions. 

The #define statement defines a macro 
for the compiler that you can use later by 
referring to that name; in this case, EOF 
means - 1 in the program. These macros 
can be powerful and can include parame- 
ters for substitution into the definition. 

The following example of a macro defi- 
nition produces a function that yields the 
maximum value of two numbers: 

#deflne MAX(A.B) ( (A) > (B) ? (A) : (B) ) 

This expression uses what's called a ter- 
nary or conditional operator (exprl ? 
expr2 : expr3). It first evaluates exprl; if 
this expression is true, the result is expr2; 
otherwise, the result is expr3. I'll return to 
this later. 

Next in Listing 1 comes the header 
main( ) identifying this as the main pro- 
gram, then declaration of variables. The 
counters of characters, words, and lines are 
integers: if you run this on an exceptionally 
large file (greater than 32K), you should de- 
clare them as long integer variables. 

The While loop contains the heart of the 
program. The expression c = getchar( ) 
reads the next character from the standard 
input and assigns its value to the variable c. 
Then, the program checks the character for 
an EOF. If it finds one. GETCHAR returns a 
value of -Is otherwise GETCHAR returns 
the character value. This is the reason for 
declaring c as an integer value — a char 
variable is 8 bits and can hold only 256 



values, providing no way to distinguish 
EOF from one of the characters. 

When the program reads a character, it 
increments the character counter 
[ + + nc]. When it finds an EOF character, 
it increments the number of lines [ + + nl]. 

Next, the program checks the character 
for "white space" characters: that is, 
blanks, tabs, and end-of-line characters 
(EOLs). The logical operator 1 1 (logical or) 
connects logical tests. 

C evaluates expressions containing 1 1 
from left to right and ends the evaluation 
when an expression is true. Similarly, the 
logical operator && (logical and) proceeds 
from left to right and ends when it evaluates 
a false expression. This differs from lan- 
guages such as Pascal or Fortran, which 
evaluate the entire expression each time it 
executes before determining its truth value. 
For example, the Pascal statement: 

IF X <> AND (1/X) > 3 THEN statement: 

will always abort on a divide-by-zero error 
if X is zero. A similar statement using the 
C operators will not abort. 

If the program finds a white space char- 
acter, it sets the flag variable "in word" to 
false, indicating that the program is cur- 
rently not in a word. If it finds another 
character and in word is false, then the 
program sets inword true to reflect the 
start of a word and increments the num- 
ber of words ( + + nw). 

The last part of the program uses the 
library routine PRINTF to display its sum- 
mary. This information outputs to the file 
"stdout." for which the default device is 
the system console or video display. 

Functioning 

The examples I've given so far don't tax 
the power of C. Now I'll introduce some 



Program Listing 1 Count {from The C Programming Language! 



This example program is taken from The C Programming Language by 
Brian W. Kernighan and Dennis M. Ritchie, page 18 



♦define 


YES 


1 


♦define 


NO 


V 


♦define 


EOF 


-1 



Mini) /* count lines, words, and chars in the input */ 

( 

int Ci nl, nw, nc, inword; 

inword ■ NO; 
nl « nw = nc = 0; 

while ( (c = getcharO ) 1= EOF) ( 

++nc; 
if (c " '\n') 

+ + ni; 
if ( (c " ' ') II (c == '\n') 

inword = NO; 
else 

if (inword « NO) I 
inword - YES; 
+ + nw; 
1 
) 
printf("%d »d %d\n", nl, nw, nc); 



(c == '\f) ) 
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more advanced features, starting with 
functions. 

In most other languages, functions are 
separate entities of code that perform 
some calculations and return a single 
value. In C. functions describe logical 
blocks of code that perform a related task. 
Functions may or may not return a value; 
they combine the capabilities of Pascal's 
functions and procedures. 

Unlike Pascal, C lets you declare func- 
tions in any order within a program mod- 
ule. What's more, you can write and 
compile functions separately. C encour- 
ages you to subdivide your code into logi- 
cal blocks and to build on these blocks. 

Previously, I defined a macro to return 
the maximum of two numbers (look back 
at it for a moment). One side-effect of using 
macros is that the expressions are reeval- 
uated for each repetition of the parameter 
in the substitution string. In the example 
above, the compiler evaluates twice the 
expression you substituted for A and B. 

If you need a maximum value function 
extensively, defining MAX as follows 
might be much more efficient: 

int max(a.b) 

int a.b: 

{ 

return ((a>b)?a:b): 

} 
This function evaluates only integer pa- 
rameters, while the macro evaluates a max- 
imum value for any type of data you supply 
as parameters. You gain efficiency because 
the compiler generates code to evaluate all 
parameters prior to calling the function— 
the function has to work with only a single 
numerical value for each parameter. 

Another benefit of C is its excellent han- 
dling of pointers, variables that contain 
the address of another variable, thereby 
pointing to the variable. You can use the 
unary operator • to denote the next oper- 
and as the address of a specific type of data 
item you want to manipulate. The unary 
operator & instructs the compiler to use 
the operand's address instead of its value. 
For example, you could declare ptr as a 
pointer to a float (float *ptr) and pi as a 
real variable (float pi), then write: 

ptr - firpi; 
•ptr = 3.14159: 

The first statement assigns the variable 
pi's Address to the pointer variable, so the 
second statement is the same as writing 
pi = 3. 14159. If you're confused, my next 
example should help clarify things. 

Arrays are closely related to pointers. In 
fact. In most cases you can use them in- 
terchangeably. Any array operation you 
can do with subscripting can also be done 
with pointers. 

You define arrays as in most other lan- 
guages. The statement int numbers! 100] 
defines an array of 100 consecutive inte- 
ger values that you access via subscript 
values from zero through 99. Note that the 
index value begins at zero so the highest 
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value is one less than the maximum di- 
mension value. C also supports multidi- 
mensioned arrays, but you soon learn that 
you can better write these expressions as 
arrays of pointers. 

I don't want to spend too much time on 
pointers and arrays, but 1*11 demonstrate 
some of their power in a more detailed ex- 
ample (sorry, this one doesn't work with 
the C interpreter accompanying this arti- 
cle (see p. 41)). 

Searching Questions 

Program Listing 2. Find, finds a specified 
string in a text file. It interrogates the com- 
mand line for parameters and a string to 
search for. Then it scans input read from 
the standard input file (stdin), searching for 
the text string. The optional parameters 
can specify whether the program displays 
lines containing the string and whether it 
displays corresponding line numbers 
along with the text. The command syntax 
is FIND [ - x] [ - nj string, where the x and 
n parameters are optional and "string" 
represents any string not containing 
blanks or other delimiters. 

The first statement defines the maxi- 
mum number of characters you can put 
on any one line. It uses the preprocessor 
control statement #define to establish the 
symbolic name MAXLINE with the proper 
buffer size. 

The main program declaration— main 
(argc.argv)— tells the compiler that you 
want to interrogate the command line pa- 
rameters. The variable argc provides a 
count of parameters on the command line, 
including the command name. The vari- 
able argv is an array of pointers, each cor- 
responding to the starting character of 
each command string. Note that you must 
declare these two variables just after the 
main program header. 

The next statement declares the line 
buffer and a pointer to a character. The 
program also declares variables for the 
line counter and for flags to determine 
whether to display lines containing the 
string and their line numbers. 

The first While loop scans the com- 
mand line arguments for the x and n pa- 
rameters. The first part, argc > 0, 

tells the While loop to look at parameters 
while the parameter count is greater than 
zero. The — operator decrements the 
counter before testing it. 

The second part of the While clause 
tests the first character of the parameter 
for a leading minus sign, which is required 
to identify the parameters. The expres- 
sion (• + +argv)[0] = = '-' requires de- 
tailed explanation. Argv is an array of 
pointers to character strings. The first 
pointer is for the command name in some 
systems. The * + + argv says to increment 
to the next pointer and then use that 
value. You need parentheses around this 
expression because of the evaluation 
priority of the operators • and + + . The 
[0] looks at the parameter's first character. 
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and the remaining part of the test com- 
pares this parameter to a minus sign. 

The program lets you specify the two 
parameters separately or in one command 
switch (e.g., -nx). The For statement 
scans the remaining characters on the se- 
lected parameter for valid switch options. 
The Switch statement checks the options 
and sets the appropriate flags or displays 
an error message if the option is invalid. 

When the While loop is completed, argc 
should equal 1, signifying that only the 
String parameter remains. The If statement 
checks for a string present and prints an 
error message and exits if it is not. 

The Else clause for this If statement is 
the heart of the program. It gets a line, 
checks for the string, performs the desig- 
nated functions, and continues until there 
are no more lines in the input stream. 

Two functions. Index and GETLINE, do 
these tasks. The Index function searches 
the line buffer for the string. If the string is 
found. Index returns an integer represent- 
ing the starting position in the buffer. If 
the string isn't found, Index returns a - 1 
(this is a normal C function exit showing 
that the desired function was not done). 

GETLINE reads characters from the in- 
put file and examines them for an end-of- 
line character. If it doesn't find an EOL, the 
program inserts the character into the 
buffer up to the limit specified. If it finds an 
EOL, it terminates the buffer as a normal C 
string (with a zero byte '\0') and returns 
with the actual length of the line. If no line 
is available. GETLINE returns a zero value. 

Index handles the string and line buff- 
ers as character arrays. Note that the func- 
tion declaration of the two arrays doesn't 
have to specify the size of the array; it 
merely tells the compiler that the two vari- 
ables represent character arrays. 

The first For loop initializes the line 
buffer index "i" and tests the character 
element s(i] for nonzero. This means the 
program hasn't reached the end of the 
buffer. The statement part of this For loop 
is a block consisting of another For state- 
ment and a completion test. 

This For loop contains an expression 
with the comma operator as the initializ- 
ing expression U = i, k = 0], which executes 
once. The loop test consists of two parts: 
a test to see if t(k] is zero (end of search 
string) followed by a comparison of the 
buffer to the string [s(J] = = t[k]]. 

The last part of the statement consists 
of two expressions separated by another 
comma forming the increments for the ar- 
ray indexes. Since the For statement 
expressions do all the work, no further ac- 
tion is required and the semicolon signi- 
fies a null statement. 

When the program exits from the For 
statement, one or both conditions are 
true: The search string has been ex- 
hausted or the string does not match. The 
If statement tests for a string match and 
returns an appropriate result. 

That's how you do it with arrays. Now 
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Unions can exist within structures and 
structures may be in unions. You refer- 
ence unions using the same operators as 
for structures. 

How Fast Is C? 

I included one last programming ex- 
ample as a test of C's performance. Pro- 
gram Listing 3, Sieve, contains source 
listings in Basic, Pascal, and C for the 
Sieve of Eratosthenes prime number gen- 
erator, which has become the de rigueur 
benchmark test. I ran these tests with 
compilers for Basic, Pascal, and C on a 
Model 4P and a Tandy 2000. Figure 4 
shows the results. 

Choosing a Compiler 

The compiler is the most important 
part of any C language software package. 
Compilers usually generate Assembly- 
language output that you must assemble. 
You should get one that generates native 
Assembly language using standard mne- 
monics if you want to modify your Assem- 
bly code. 

For example. Aztec's package gener- 
ates code in standard assembler format: 
you can't use it with Microsoft's assem- 
bler but Manx's assembler really is better 
anyway. Your compiler must be able to 
handle the language as defined in The C 
Programming Language by Brian W. Ker- 
nighan and Dennis M. Ritchie (Prentiss- 
Hall. $19.95). If you're interested in C. you 
must have a copy of this book. 

Your compiler also must support full 
preprocessor macro definitions and con- 
ditional compilation controls if you're 
going to easily port your software from 
one computer to another. 

Aztec C prides itself on just this type of 
support. I have moved programs written 
for the Model 4 to the Tandy 2000 and IBM 
PC with relative ease. 

Other support software is vital also. This 
includes the library support. A full Unix- 
like library is essential. Of the compilers I 
have seen. Aztec is best in this area. Unix- 
style utilities are also necessary. Make is a 
utility that updates complex modular pro- 
grams by recognizing modules that need 
recompiling, compiling them, and linking 
them together. A source level debugging 
tool helps find those kinky problems that 
occur from time to time. Another needed 
tool is a library manager so you can make 
your own libraries of compiled functions 
or update existing ones. 

On the IBM PC and other 16-bit com- 
puters, the compiler should be able to 
handle all combinations of memory 
models. This means that you should be 
able to select code space less than or 
greater than 64K. Similarly, you should 
be able to use more than 64K of data space 
or limit yourself to the smaller configura- 
tion. Not all 16-bit compilers support this. 

And Finally 

C isn't for everyone. It is not a panacea 



for programming problems. You can do are relatively long and can significantly 
most simple programming tasks in Basic. slow program development, 
and C is more difficult to use than many Why. then, is C so popular? It is out- 
languages. As Fig. 4 shows, compile times standing for software development. The 



Listing 3 continued 

90 FOR J = TO 8190 
100 IF NOT FLAGS(J) THEN GOTO 170 
110 PRIME - J + J + 3 
120 ' PRINT PRIME, 

130 FOR K ■ J+PRIME TO 8190 STEP PRIME 
= 



140 FLAGS (K 

150 NEXT 

160 COUNT - 

170 NEXT 

180 NEXT 

190 PRINT COUNT; 



COUNT + 1 



primes. 



(b) program sieve (output) ; 

const 

size - 8190; 
sizel - 8191; 

var 

i, prime, K, count, iter : integer; 
flags : array [0. .sizell of boolean; 

begin 

write('10 iterations: '); 
for iter : = 1 to 10 do 
begin 

count :« 0; 

for i :- to size do 

flagsjil :- true; 
for i :«= to size do 
if flags [i] then 
begin 

prime :* i + i + 3; 
{ write(prime:8) ; 

k :«= i + prime- 
while (k <= size) do 
begin 

flags [kj := false; 
k t" k + prime; 
end; 
count :- count + 1; 
end; 
end; 
writeln (count, ' primes.'); 
end. 



(c) /* Benchmark */ 

(include <stdio.h> 

•define SIZE 8190 /* size of the number array */ 

Idefine SIZE1 8191 /* SIZE + 1 */ 

•define NTIMES 10 /* number of times to execute loop */ 

Idefine TRUE 1 

Idefine FALSE 

char flaglSIZEl] ; 

mainO /* compute primes using the Sieve of Eratosthenes */ 

{ 

register int i, j, k, count, prime; 
printf("%d iterations: ".NTIMES); 
for (i = 1; i <= NTIMES; i++) 
{ 

count » 0; 

for (j - 0; j <■= SIZE; j++) 

flag(j) - TRUE; 
for (j - 0; j <» SIZE; j++) 



{ 



if (flaglj]) 
I 

prime ■ j + j + 3; 

/* printfC %d ", prime); */ 

for (k = j+prime; k <= SIZE; k += prime) 
flag[k] « FALSE; /* discard multiples */ 

count++; 



printf("%d primes. \n", count); 
exit(0); 



End 
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Unions can exist within structures and 
structures may be in unions. You refer- 
ence unions using the same operators as 
for structures. 

How Fast Is C? 

I included one last programming ex- 
ample as a test of C's performance. Pro- 
gram Listing 3, Sieve, contains source 
listings in Basic, Pascal, and C for the 
Sieve of Eratosthenes prime number gen- 
erator, which has become the de rtgueur 
benchmark test. I ran these tests with 
compilers for Basic, Pascal, and C on a 
Model 4P and a Tandy 2000. Figure 4 
shows the results. 

Choosing a Compiler 

The compiler is the most important 
part of any C language software package. 
Compilers usually generate Assembly- 
language output that you must assemble. 
You should get one that generates native 
Assembly language using standard mne- 
monics if you want to modify your Assem- 
bly code. 

For example, Aztec's package gener- 
ates code in standard assembler format; 
you can't use it with Microsoft's assem- 
bler but Manx's assembler really is better 
anyway. Your compiler must be able to 
handle the language as defined in The C 
Programming Language by Brian W. Ker- 
nighan and Dennis M. Ritchie (Prentiss- 
Hall. $19.95). If you're interested in C. you 
must have a copy of this book. 

Your compiler also must support full 
preprocessor macro definitions and con- 
ditional compilation controls if you're 
going to easily port your software from 
one computer to another. 

Aztec C prides itself on Just this type of 
support. I have moved programs written 
for the Model 4 to the Tandy 2000 and IBM 
PC with relative ease. 

Other support software is vital also. This 
includes the library support. A full Unix- 
like library is essential. Of the compilers I 
have seen, Aztec is best in this area. Unix- 
style utilities are also necessary. Make is a 
utility that updates complex modular pro- 
grams by recognizing modules that need 
recompiling, compiling them, and linking 
them together. A source level debugging 
tool helps find those kinky problems that 
occur from time to time. Another needed 
tool is a library manager so you can make 
your own libraries of compiled functions 
or update existing ones. 

On the IBM PC and other 16-bit com- 
puters, the compiler should be able to 
handle all combinations of memory 
models. This means that you should be 
able to select code space less than or 
greater than 64K. Similarly, you should 
be able to use more than 64 K of data space 
or limit yourself to the smaller configura- 
tion. Not all 16-bit compilers support this. 

And Finally 

C isn't for everyone. It is not a panacea 



for programming problems. You can do 
most simple programming tasks in Basic, 
and C is more difficult to use than many 
languages. As Fig. 4 shows, compile times 



are relatively long and can significantly 
slow program development. 

Why, then, is C so popular? It is out- 
standing for software development. The 



testing 3 continued 

90 FOR J = TO 8190 

100 IF NOT FLAGS (J) THEN GOTO 170 

110 PRIME « J + J + 3 

120 ' PRINT PRIME, 

130 FOR K = J+PRIME TO 8190 STEP PRIME 

140 FLAGS(K) = 

150 NEXT 

160 COUNT " COUNT + 1 

170 NEXT 

180 NEXT 

190 PRINT COUNT;" primes." 

(b) program sieve (output ) ; 

const 

size = 8190; 
sizel - 8191; 



i, prime, k, count, iter : integer; 
flags : array [0. .sizel] of boolean; 

begin 

write('10 iterations: '); 
for iter :« 1 to 10 do 
begin 

count := 0; 

for i := to size do 

flags[i] :« true; 
for i :■ to size do 
if flagslil then 
begin 

prime := i + i + 3; 
write(prime:8) ; 
k :•= i + prime; 
while (k <■ size) do 
begin 

flags[k] := false; 
k := k + prime; 
end; 
count :* count + 1; 
end; 
end; 
writeln (count, ' primes.'); 
end. 



(c) 



/* size of the number array */ 

/* SIZE + 1 */ 

/* number of times to execute loop */ 



/* Benchmark */ 
•include <stdio.h> 
♦define SIZE 8190 
♦define SIZEl 6191 
♦define NTIMES 10 
♦define TRUE 1 
♦define FALSE 

char flag [SIZEl] ; 

main() /* compute primes using the Sieve of Eratosthenes */ 

{ 

register int i, j , k, count, prime; 
printf("%d iterations: ", NTIMES); 
for (i « 1; i <- NTIMES; i++) 
( 

count = 0; 

for (j - 0; j <= SIZE; j++) 

flaglj] = TRUE; 
for (j - 0; j <■ SIZE; j++) 
I 

if (flag[j]) 
( 

prime ■ j + j + 3; 

/* printff %d ", prime); ♦/ 

for (k ■ j+prime; k <» SIZE; k += prime) 

flag(k] ■ FALSE; /* discard multiples */ 
count++; 



} 



} 



printf("%d primes. \n", count); 
exit (0) ; 



End 
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Source file size 
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896 


Execution file size 
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Source time (sec) 


62 


84 


Execution time (sec) 
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Interpreter 


Compiler 


344 
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21.927 
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179 
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20.3 


384 


384 
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23.248 


N/A 


67 
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The code size listed for the Basic Interpreter Includes the size of the Interpreter Itself. 
The compilation times listed Include the lime required to assemble, link, and/or convert 
the source code Into a stand-alone program. 

Model -4/4P: TRSDOS 06.02.00 Disk Operating System 
Microsoft BASIC Interpreter 01 .01 .00 
Microsoft BASCOM Compiler version 535 
Manx Aztec-CSO Version ] .06B 
TRSSO (Alcor) Pascal 02.OO.00. 

Tandy 2O00: MS-DOS Disk Operating System Version 02.11.02 
Microsoft BASIC Interpreter 01.03 00 
Microsoft BASCOM Compiler Version 5.50 
Manx Aztec-CS6c Version 3.20C 
Microsoft PASCAL Version 3.13. 

Figure 4. Sieve of Eratosthenes comparison. 



biggest cost factor in developing software 
is the time required to design, write, and 
debug the code. If you can reduce any of 
these factors, your profit will increase. C 
does this in a major way, since it makes 
coding routines in Assembly language (a 
lengthy process) virtually unnecessary. 

Other important factors in software de- 
sign are overall size and speed. As you can 
see from the simple example in Fig. 4, the 
code a good C compiler produces is far 
smaller than that of other compilers for 
microcomputers. Also, C's compiled code 
executes as fast as, and often faster than, 
that of other compilers. 

If you're interested in programming ap- 
plications software and want to exploit your 
computer fully, you must have a compiler. 
C lets you run your software on the widest 
possible variety of systems, and I highly 
recommend that you investigate it. ■ 

John B. Harrell III writes about pro- 
gramming and edits Spreadsheet Beat. 
You can contact him do 80 Micro, 80 
Pine St.. Peterborough, NH 03458. 
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Circle S»2 on Reade' Service card 



SUPERTAX 



Get Supertax now and 
relax on April 15th . 



Over 100,000 1984 Tax Returns Prepared by SUPERTAX* 

Use SUPERTAX personal income tax programs to calculate your tax liability now and have plenty ot 
time to make year-end investment decisions to improve your position SUPERTAX was developed 
by a practicing CPA with a Master's degree in tax accounting Highly acclaimed by tax pros. CPA's 
and tax preparers. SUPERTAX is easy to understand and a pleasure to work with Available tor 
TRS-80 (2 drives). Apple II I , IBM-PC, and Sanyo MBC-550 Series. 

• SUPERTAX is fully screen-prompted and includes 
a manual loaded with valuable tax information, 
instruction and guidance 

• SUPERTAX instantly recalculates your entire return 
when you change any item 

• SUPERTAX prints directly on IRS forms 



SUPERTAX DATA can be stored on a diskette 
SUPERTAX updates are available at 50% 
discount to registered SUPERTAX users. 
SUPERTAX is tax deductible and output 
quality rivals best service bureaus 
•Est. based on survey ol 1 984 SUPERTAX users 



FOR TAX PLANNING 

Using either screen or printer output SUPER- 
TAX generates clear and concise summaries of 
Page i and 2 and Schedule A ot FORM 1 040 
allowing you to see at a glance and to quickly 
comprehend your tax situation This program 
also prints an OVERALL SUMMARY ot the 
return showing Ad|usted Gross Income. 
Itemized Deductions Taxable Income Regular 
Tax and Payment Due or Refund— an of which 
are calculated by the program SUPERTAX also 
calculates the moving expense deduction 
investment credit, taxable capital gams political 
and child care credits, medical limitations, and 
much more Input is fast and easy and changes 
can be made in seconds This program actually 
makes tax ptann ng a breeze 



FOR RETURN PREPARATION 

SUPERTAX PRINTS THE INCOME TAX 
RETURN: SUPERTAX prints page 1, page 2 
of the FORM 1040, Schedules A B, C. D, E, G. 
SE and W ot the FORM 1 040 as well as 
FORMS 3468 (investment credit) and 6251 
(Alt Mm Tax) on standard IRS government 
lorms or on blank computer paper tor use with 
transparencies Any item of input can be 
changed in seconds and the entire return is 
automatically recalculated to instantly reflect 
the change. 



TRS-80, Apple II + IBM-PC and Sanyo are 
trademarks of Tandy Corp, Apple 
Computer, Inc., International Business 
Machines and Sanyo Business Systems 
Corp respectively 



TO ORDER Send Check or Money Order to ROCKWARE DATA CORP 
PO Box 365, Piano. TX 75074, or call 214-596-0588. VISA and MasterCard 
accepted. Add S3. 00 shipping on all orders. TX residents add sales tax. 




FOR 

DEPRECIATION 
CALCULATION 

SUPERTAX also includes 
a stand alone depreciation 
program which calculates 
and pnnts your depreciation 
schedule using both the old rules 
and the new ACRS rules Output from 
the depreciation program is designed to 
serve as a supplement to IRS FORM 
4562 



Complete 
1985 Edition 



Rockware Data Corporation 
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Powerful Programming Tools 
At Bargain Prices 



C compiler 

for the model 1 or 3 using 

TRSDOS, LDOS, NEWDOS, 

DOSPLUS, or MULTIDOS; 

includes full screen text editor and 
advanced development package 

List Price $2§&Sa 
Sale Price $89.95 



Multi-Basic compiler 

for the model 1 or 3, or 4 using 
TRSDOS, LDOS, NEWDOS, 
DOSPLUS, or MULTIDOS; 

includes full screen text editor and 
advanced development package 

List Price ;$25&§a 
Sale Price $89.95 



This is a full K & R standard implementation of 
C that includes a Unix compatible function 
library. The package also includes a 450 page 
manual with a tutorial on using the C language. 
If you've been wanting to learn C, this is the 
package you need. 





Features 


Include 


char 


8 bits 


initializers 


short 


8 bits 


typedef 


mt 


16 bits 


static 


unsigned 


16 bits 


auto 


long 


32 bits 


extern 


float 


32 bits 


struct /bit fields 


double 


64 bits 


union 



Execution speed on the Model 3 for 10 
iterations of the prime number program 
published in Byte, Jan 83, page 284. 



LC Compiler 
Alcor C 



105 sees. 
78 sees. 



Special Bonus 

Buy one version for $89.95 and get the version 
for the other model for onlv $21. 



Multi-Basic is a TRS-80 BASIC compatible 
compiler. The Model 4 version supports 
everything in the TRSDOS 6 BASIC interpreter 
except the COMMON statement. The same 
support is provided in the Model 1 and 3 
versions so programs are portable. The CMD 
statement is the only statement from the Model 
1 and 3 BASIC interpreters that is not 
supported. 

Multi-Basic also supports advanced language 
features like multi-line procedures and 
functions, recursion, and dynamic string 
management (no long pauses for garbage 
collection). 

Execution speed on the model 3 for 10 iterations 
of the prime number program published in Byte, 
Jan 83, page 286. 



BASIC Interpreter 
Multi-Basic 



4570 sees. 
89 sees. 



Special Bonus 

Buy one version for $89.95 and get versions for 
the other two models for only $21 each. 



Sale Price Extended Through October 31 



C Compiler 



Circle version(s) 
One version ($89.95) 
Both versions ($110.95) 
Add (s% sales lax (Texas only) 
Shipping $6 USA | $28 foreign) 
Toul 



Model 
I 3 



1132 Commerce Systems 
Richardson. TX 75081 
(214) 238-8554 

Circle 215 on Reader Service card. 



Name 

Street _ 

City 

State 

Zip _ 
Country 
Phone . 



Also available for CP'M & MSDOS 
$89.95 each 



MC □ Visa C Money Order C Check D COD D 
Card » exp 



Multi-Basic Compiler 



Model 
1 3 4 



Circle version(s) 
One version ($89.95) 
Two versions ($110.95) 
Three versions ($131 95) 
Add 6% sales tax (Texas only) 
Shipping $6 USA. $28 foreign) 
Total 



Multi-Buic ii a trade mark of Alcor System! 
TRS-80 ii a rcpstr rrd trademark of Tandy Corp 
MSDOS i» a trademark of Microsoft 
CP M is a trademark of Digital Research 
l.'nix is a trademark of Bell T jibor atones 
l.C is a trademark of Misosys 




D 

I eading through a sheet of basket- 
■ ball statistics may not substitute 
for the give and take of live play but, as 
any high school coach can tell you, the 
numbers give you the lowdown on team 
performance. My Model I/III/4 basketball 
statistics program. Hoops, keeps track of 
a team's record, an individual's record, 
and overall game statistics (see the Pro- 
gram Listing and Fig. 1). 

Hoops lets you print out five different 
reports: the team record (see Fig. 2), team 
totals by game (see Fig. 3). cumulative to- 
tals for each of the team members (see Fig. 
4), an individual player's statistics, and 
the printout for a particular game. 

Getting Organized 

The key to Hoops' statistical manipu- 
lation lies in its file handling (see the Table 
for Hoops' line descriptions). The program 
uses both random-access and sequential 
files; it opens random-access files using 
Basic's buffer 1 and sequential files with 
buffer 3. 

Hoops records up to 20 players' statis- 
tics in random-access files called PLAY- 
ER 1/TXT. PLAYER2/TXT. and so on. 
Each of these files contains records; rec- 
ord 1 holds the statistics for game 1 . rec- 
ord 2 for game 2. and so on. Hoops stores 
the team totals for each game in the ran- 
dom-access file called PLAYER2 1/TXT. 
and the opponents' totals for each game in 
PLAYER22/TXT. 

Hoops also uses five sequential files. 
TEAMINFO/TXT contains the school's (or 
team's) name, the coach's name, the year, 
the number of wins and losses, and the 
number of players on the team. Games/ 
TXT contains the name of the opponent, 
the date, whether it's a home or away 
game, and the score for each game. 

Players/TXT contains the names and 
jersey numbers of all the players. Hoops 
keeps the cumulative totals for a team in 
Totals/TXT. It initially fills this file with 
zeros. Hoops uses one other file, TEMP- 
FILE/TXT, when you make corrections; 
the program opens it through buffer 2. 
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by David H. Pleacher 

Hoops covers the court in recording and 
reporting basketball statistics by team or player. 



File-Handling Routines 

To see how Hoops' file-handling rou- 
tines work, follow the routine for adding a 
player to the team (lines 4470-4570). 
When you select the option to add a player 
from the main menu, Hoops first opens 
the sequential file TEAMINFO/TXT for in- 
put and reads the data from it. Then it 
opens the sequential file Players/TXT for 
input and reads the data from that file. Fi- 
nally, it opens the sequential file Totals/ 
TXT and reads the totals for each player 
from that file. 

After you enter the additional players 
and their corresponding Jersey numbers. 
Hoops opens the sequential files Players/ 
TXT and Totals/TXT for output, and 
writes the updated data to them. For ex- 
ample, if you just added the 16th player to 
a team, the routine opens the random-ac- 
cess file PLAYER 16/TXT and fields it. 
This file contains player 16's statistics for 
each game. If you already played four 
games when you add player 16 to the 
team, Hoops fills the first four records with 
zeros using the RSET (lines 790-860) and 
Put (line 880) statements. 

Often, Hoops accesses several files to 
make one printout. For example, to print 
the statistics for the third game, you need 
the sequential files TEAMINFO/TXT. 
Games/TXT. and Players/TXT; and rec- 
ord 3 of each of the random-access files 
PLAYER 1/TXT, PLAYER2/TXT. . .PLAY- 
ER22/TXT 

Using Hoops 

Use the template in Fig. 5 to record game 
statistics during play. You can later add this 
data to the program's statistical files. 

To use Hoops, enter Basic with three 
variable files and run the program. (Hoops 
has a fun but time-consuming opening 
display. Delete lines 80 and 5150-5350 to 
eliminate it.) 

To enter data for a new team, select op- 
tion A from the main menu. Hoops 
prompts you for the school (or team) 
name, the coach's name, and the players' 
names and Jersey numbers. If you make 



an error. Hoops lets you correct it at the 
end of each record input. 

Once you enter this information, you can 
choose any of Hoops' other options: add a 
player, type in statistics for a game, make 
corrections to previously entered data, or 
print out reports. If, by mistake, you select 
the option to update statistics or the option 
to add a player, you are given a chance to 
exit from that module immediately. 

Hoops lets you enter a zero for a partic- 
ular category by pressing the enter key. 
This is useful when a team member plays 
only two minutes in a game and most of 
that player's statistics are zeros. 

To print out the statistics, you need a 
printer with a 1 10-column capability. You 
must use 1 1 - by 14-inch paper if your print- 
er prints 132 columns, condensed print- 
ing if you have an 80-column dot-matrix 
printer, or elite printing for a daisy-wheel 
printer. Feeding single sheets of 8'^- by 1 1- 
inch paper sideways makes excellent 
printouts on a daisy-wheel printer. 

Hoops' Limitations 

You can enter only the 13 statistics the 
program uses. Although these are proba- 
bly the most basic basketball statistics, 
some coaches might keep additional sta- 
tistics, like minutes played. 

You need to keep players' names to 
20 characters, and opponents' names to 
14. I did this to keep the printouts to 
110 columns.! 

Write to David H. Pleacher at 5047 
Caroline Ave., Stephens City, VA 22655. 



SO 



System Requirements 

Models I and 4 with changes 

Model m 

32KRAM 

Disk Basic 

Printer (1 10-column) 



Model I change: 

Remove POKEs. 

Model 4 changes: 

Correct PRINT @ locations. 

Change 960 to 1200 in lines 160 and 

200. 

Remove POKEs. 

Delete opening display: lines 80 and 

5150-5350. 

Change % to \ (clear key with ? key). 



Figure 1. Program changes for the Models I and 4. 



John Uandley High School Basketball Statistics 
1984 - SS 



CM 


chi Bill Isherwood won 


9 


Lost I 1 






Score 




ame 


Date Opponent 


Us 


Opponent 


1 


12/11/84 Clarke County 


69 




63 


2 


12/14/84 Warren County 


64 




57 


3 


12/18/84 Parkview 


61 




51 


4 


12/20/84 Martineburg 


68 




62 


5 


12/27/84 Harrisonburg 


53 




59 


6 


12/28/84 James Wood 


82 




48 


7 


81/84/85 Broad Run 


68 




68 


8 


•1/11/85 Loudoun County 


67 




56 


9 


81/12/85 Loudoun Valley 


63 




62 


11 


81/19/85 Osbourn 


84 




68 



Figure 2. The team record. 







John Handley High School 


Basketball 


Statlstl 


CB 






























1984 


- 85 
































Coach i Bill Isherwood 


Worn 9 


Losti 1 








































SCO. 


Off 


Def 


Tot 


Reb. 


Trn 




Drw 




Blk 




Gt Date 


Opponent 
Clarke County 


H/A 
Away 


PGM 
32 


PGA 

78 


PG % 

45.7 


PTM 
5 


PTA 
16 


PT t 

31.2 


Pta. 
69 


Avg. 
69.8 


Reb 
23 


Reb 
22 


Reb 
45 


Avg. 
45.0 


Ovr 
IB 


A 

16 


Fou 
1 


Stl 
9 


Sht 
6 


P 
18 


1 12/11/84 


2 12/14/84 


Warren County 


Home 


26 


65 


40.0 


12 


29 


41.3 


64 


64.8 


19 


20 


39 


39.0 


17 


15 










3 12/18/84 


Parkview 


Away 


25 


58 


50.0 


11 


16 


68.8 


61 


61.9 


11 


19 


30 


30.0 


9 












4 12/28/84 


Martina burg 


Home 


25 


50 


50.0 


18 


28 


64.3 


68 


68.0 


12 


15 


11 


27.0 


17 


1J 










5 12/27/84 


Harrisonburg 


Borne 


23 


63 


36.5 


7 


12 


58.3 


53 


53.8 


17 


16 


33 


33.0 


14 


14 










6 12/28/84 


James Wood 


Home 


33 


65 


50.8 


16 


21 


76.2 


82 


82.0 


16 


17 


a 


33.0 


17 


14 










7 81/84/85 


Broad Run 


Away 


25 


49 


51.8 


18 


25 


72.0 


68 


68.0 


7 


15 


22 


22.0 


19 


15 


1 


1/ 






8 81/11/85 


Loudoun County 


Home 


28 


57 


49.1 


11 


18 


61.1 


67 


67.0 


17 


17 


34 


34.0 


21 












9 81/12/85 


Loudoun Valley 


Away 


24 


59 


40.7 


15 


23 


65.2 


63 


63.0 


1/ 


16 


ii 


33.0 


11 


15 










IB 81/19/85 


Osbourn 


Home 


31 


58 


53.4 


22 


29 


75.9 


84 


84.0 


7 


16 


23 


23.8 
















Totals 




272 


586 


46.7 


135 


217 


61.4 


679 


67.9 


146 


173 


319 


31.9 


155 


156 


5 


137 


43 


164 










Figure 3. 


The team tot 


als by game. 

























John 


Handley High School 
1984 


Basketball 
- 85 


Statisti 


CB 
























Coach i 


Bill I 


Sherwood 


wont 9 


Lost: 


1 






























10 


Game 


Totala 












































Sco. 


Off 


Def 


Tot 


Reb. 


Trn 




Drw 




Blk 




t Player 


G 


Otr 


FGH 


PGA 


PG % 


PTM 


FTA 


FT % 


Pts. 


Avg. 


Reb 


Reb 


Reb 


Avg. 


Ovr 


A 


Tou 


Stl 


Sht 


F 


- 


— 











_____ 


___ 








- ■- 


i - - . 
































10 Dwayne Richardson 

12 Evan Humbert 

13 Harold Brown 


10 

10 

3 


21 
37 

4 


1 

19 

2 


9 

45 

9 


n.i 

42.2 
22.2 


2 
25 


7 

34 

1 


28.6 

73.5 

9.0 


4 

63 

4 


8.4 

6.3 

1.3 


1 

7 




2 
23 

1 


3 
38 

1 


B.3 
3.B 
B.3 


8 
25 


a 

65 





2 



/ 

20 



1 




6 

25 




14 Jason Morgan 
20 Joe Wilson 
32 John Morgan 


10 
9 

10 


38 
34 
3B 


73 
24 
78 


140 
SB 

160 


52.1 
48.8 
48.8 


25 

14 
42 


43 
23 

63 


58.1 
60.9 
66.7 


171 

62 

198 


17.1 
6.9 

19.8 


27 
21 
39 


16 
19 
43 


43 
48 

82 


4.3 
4.4 

8.2 


31 
17 

27 


38 
12 

IB 


1 
2 



40 

28 

15 


3 

5 

24 


31 
27 
23 


54 Mike Hardware 
44 Mario Pritcbett 
40 Richard Pell 


10 
10 
18 


36 
33 
38 


36 
16 
12 


75 
41 
34 


48. B 
39.8 
35.3 


5 

12 

6 


12 

17 

8 


41.7 
70.6 
75.0 


77 
44 

38 


7.7 
4.4 
3.0 


29 

5 
8 


37 
11 
12 


66 

16 
28 


6.6 
1.6 
2.B 


18 
12 
IB 


6 
14 

1 







IB 

10 

2 


8 
8 
1 


22 
9 

14 


34 Mike Look 

21 Jeff veal 

22 Daruel Robinson 


8 
3 

4 


18 
4 
5 


4 

3 
2 


12 

5 
3 


33.3 
60. 
66.7 


4 





7 
1 



57.1 
0.0 


12 
6 
4 


1.5 
2.B 
l.B 


1 
3 
2 


4 
3 



5 
6 

2 


8.6 
2.8 
B.5 


3 
3 

1 


8 
1 
1 






3 

1 







2 

1 
2 


30 Jude Sparrow 


6 


8 


2 


3 


66.7 





1 


B.B 


4 


B.7 


3 


2 


5 


0.8 


B 








1 


1 


2 


- Team Totals 

Team - per game 


11 

1 


40 

4 


272 
27 


586 
59 


46.4 
46.4 


135 
14 


217 
22 


62.2 
62.2 


679 
68 


67.9 
67.9 


146 
15 


173 

17 


319 
32 


31.9 
31.9 


155 
16 


156 
16 


5 
1 


137 

14 


43 

4 


164 

16 


Opponents 

Opp. - per game 


18 

1 


40 
4 


240 
24 


535 
54 


44.9 
44.9 


106 
11 


162 

16 


65.4 
65.4 


586 
59 


58.6 
58.6 


153 

15 


167 
17 


328 
32 


32.0 
32.0 


B 



















155 

16 






Fig 


ure 


4. The cumulative tota 


Is for 


team members 
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1.0 


i 
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3 


13 
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Z 


z. 


Jt 
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| bO 


H 


H.O 


c 


1 


1 


1.0 











o 


o 





i± 


Jctscm NirrytY) 


3 


? 


II 


M 


3 


3 


IOO.0 


/T- 


fro 


2 


z 


H 


i.o 


1 


a 





z 





z 


2D 


J~»£- Wiho-r) 


d 


7 


f. 


33.3 








0-0 


V 


H.o 


~P 1 1 


H.o 
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/ 


1* 
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Figure 5. Template for recording game statistics. 



Legend 



Q«r 


Quarter 


FTM 


Free 


Def 


Defensive 










Reb 




FGM 


Field goals 












made 


FTA 


Free throws 


Tot 


Total 


FGA 


Field goals 




attempted 


Reb 


rebounds 




attempted 


FT% 


Free throws 












pereentage 


Trn 


Turnovers 


FG% 


Field goals 


Off 


Offensive 


Ovr 






pereentage 


Reb 


rebounds 


A 


Assists 



Drw 
Fou 

Stl 

BIk 
Sht 



Draw 
offensive 

fouls 

Steals 

Blocked 
shots 

Fouls 



Circle 200 on Reader Service card 



Easy to use: 


Excellent 


Good does: 


Excellent 


Bug Free- 


Good 


Does the job: 


Good 



"WmdoW'Comm is a unique and 
handy application for the Model II. 
It's a good terminal program for 
someone looking for easy operation 
without a lot of oonfusing features. 

Dec. 85 SO MICRO 

Now in enhanced Model 4 version! 



Use single keystroke* to obtain printouts, 
directory window*, help windows, baud 
rale and parity settings, and much more' 
Output to line printer while you continue 
working* 

"Autocall" window dials phone for you 
using virtually any auto dial modem! 
Custom -configure your "Window-Comm" 
system' 

I will send you 




"Window-Comm" Communications System 

For TRS-80 Models III 4 with 

at least one drive and 48K RAM. 

"Talk to bulletin boards. CompuServe and works' 
other computers! 
•Use Macintosh* like pull down windows 
to display several files and functions si 
multaneoualy' 
•Send and receive data and files to and from 
other computers (receive files unattended)! 
•Download "free" software from public do- 
main software libraries! 
"Design and set up your own custom net 

INTRODUCTORY OFFER. . , . 

ONLY •18.861! Oct a friend to order and 

a check for S10 (limit one per customer)! 

10 Day Pull Refund Trial Period 

THIS OFFER WILL NOT LAST LONG . . . HURRY!! 

Pacific Sof tware Consultants 

P.O. Box 5 San Luis Rey, CA 92068 

619/439-2577 

• Macintosh is s trademark of Apple Computer Inc 



Please send me copies of Window-Comm 

Method of payment, (check one): 

Check 

Money Order. . . 



Tli is software will be used on: (chock one) 

IKS HO Model III. 
TRS-8U Model IV. 

Send Window-Comm to: 



Name: 

Company. 

Address: 

City, State, Zip . 
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Circle 290 on Reader Service card. 




FOR TANDY 

11/12/16/6000 

(TRSDOS™, XENIX ". 

or CP/M*) 

How much would you lose if 
a power failure, hardware glich, 
or other disaster damaged or 
destroyed your hard disk data 
files? How long would it take to 
reconstruct them? How would 
the loss affect your business? 

SNAPBACK cant prevent a 
disaster. But it can back up your 
hard disk so quickly and inexpen- 
sively that you can always be 
prepared for the worst. This is 
possible because SNAPBACK is 

• FAST. It copies 1.5 (Mod. II) to 
2 4 (Mod. 12/16/6000) Mbytes 
of data per minute to 8" floppy 
disks. Thus, you can back up a 
15 Mbyte drive in as little as 
7-8 minutes. 

• FLEXIBLE. It works with any 
Model 11/12/16/6000. any 
8.7/12/15/35 Mbyte Tandy 
drive, and any XENIX, TRSDOS, 
and/or CP/M data. 

• EASY. Its menus make it a snap 
to back up or restore your data 
(with optional verification) 

• INEXPENSIVE. It only costs 
$125.00 

If you value your data, you 
need SNAPBACK. It's the best 
insurance available. 

The SNAPBACK package 
includes two bootable disks and 
complete documentation. To 
order, phone or write today 

IMastercard, VISA, Check, or UPS 
COD ( $2) accepted Add S7 50 for 
handling/shipping CA residents add 
6% sales tax.) 



PICKLES « TROUT 

PO. BOX 1 206 
GOLETACA93116 

(805) 685-4641 



XENIX - Microsoft Corp. 

CP/M" Digital Research. Inc 

TRSDOS™ Tandy Corp 




Lines 


Description 


70-130 


Main program. 


150-340 


Most -often-used subroutines. 


350-1770 


Frequently used subroutines. 


1780-1970 


Main menu. 


1980-2490 


Statistics update module. 


2500-2580 


"Team record" module. 


2590-2710 


"Team totals by game" module. 


2720-2890 


"Cumulative totals for team members" module. 


2900-3100 


"Statistics for individual player" module. 


3110-3370 


"Statistics for a particular game" module. 


3380-4460 


Change statistics— make corrections. 


4470-4570 


"Add team members" module. 


4580-4800 


Initialization routine. 


4810-5110 


Program instructions. 


5120-5140 


Housekeeping. 


5150-5350 


Opening display. 


5360-5400 


Error-handling routines. 




Table. Program outline of Hoops. 



Program Listing. Hoops. 



•• Basketball Statistics •* 

** David Pleacher *• 

•* John Handley High School ** 

•• P.O. Box 918, Winchester, VA 22681 •• 



18 REP. 

20 REM 

38 REM 

48 REM 

SB REM 

60 REM •* Main Program •* 

70 CLEAR 500 tON ERROR GOTO 5378 

80 GOSUB 5168 ' Opening Display 

90 GOSUB 5130 ' Housekeeping 

100 GOSUB 4820 ' Instructions 

110 GOSUB 1790 ' Menu 

120 GOSUB 1590 ' End of Program 

130 END 

140 : 

150 REM ** Subroutine to press <ENTER> to continue *• 

160 PRINTC960, 'Press <ENTER> to continue.'; 

170 IF INKEYS <> CHRS(13) THEN 170 

180 CLS i RETURN 

190 REM •* Subroutine for YES/NO answer ** 

200 PRINTB960, 'Is this information correct (Y/N) ?"; 

210 POKE 16409, 1:T$-INKEY$ 

220 IF T$ <> 'Y' AND T$ <> "N" THEN 210 

230 POKE 16409,0 : RETURN 

240 REM ** Print to TEAMINPO/TXT file •* 

250 OPEN'O", 3, "TEAMINFO/TXT" : PRINT! 3, S$;",';C$;",";Y$;",';G;W;L;P: CLOSE: RETURN 

260 REM ** Input from TEAMINFO/TXT file •• 

270 OPEN "I ", 3, 'TEAMINFO/TXT" s INPUT! 3, SS,CS,Y$,G,W,L, Pi CLOSE I RETURN 

280 REM ** Zero values of T(x,y) ** 

290 FOR Xl-1 TO 22:FOR Yl-1 TO 20:T(X1,Y1)«0 :NEXT YliNEXT XI: RETURN 

300 REM ** Print to TOTALS/TXT file •• 

310 OPEN '0', 3, "TOTALS/TXT" 

320 POR X-l TO PiGOSUB 340 :NEXT X:F0R X-21 TO 22:GOSUB 340 :NEXT X 

330 CLOSE: RETURN 

340 FOR Y-l TO 20 :PRINT»3 ,T(X, Y) :NEXT Y:R£TURN 

350 REM ** Input from TOTALS/TXT file ** 

360 OPEN'I", 3, 'TOTALS/TXT* 

370 FOR X-l TO PiGOSUB 390 iNEXT XiFOR X-21 TO 22:GOSUB 390 :NEXT X 

380 CLOSE: RETURN 

390 FOR Y-l TO 20 : INPUT43 ,T(X, Y) iNEXT Y:RETURN 

400 REM ** Print to PLAYERS/TXT file •• 

410 OPEN'O", 3, "PLAYERS/TXT' 

420 FOR X=l TO P:PRINT«3, PS(X) ; ', '; NS(X) (NEXT X: CLOSE: RETURN 

430 REM ** Input from PLAYERS/TXT file •• 

440 OPEN'I ',3, "PLAYERS/TXT" 

450 FOR X-l TO P: INPUT43 ,PS(X) ,N$ (X) :NEXT X:CL0SE 

460 PS(21)«'Team Totals': N$(21)-"-":P$(22)«"Opponents" : N$(22)-'-' 

470 RETURN 

480 REM *• Zero values of S(x) ** 

490 FOR Xl-1 TO 20:S(Xl)=0iNEXT XI: RETURN 

500 REM ** Zero values of A(x) ** 

510 FOR Xl-1 TO 20:A(X1)-0:NEXT XI: RETURN 

520 REM ** Update 12 Statistics for players and opponents •• 

530 PRINTC449, "Pield Goals Made*; : INPUT A(3) 

540 PRINTS481, "Field Goals Attempted': : INPUT A(4) 

550 PRINTe513,"Pree Throws Made'; : INPUT M6) 

560 PRINT#545,'Free Throws Attempted'; : INPUT A{7) 

570 PRINTS577, 'Offensive Rebounds'; : INPUT A(ll) 

580 PRINTe689, 'Defensive Rebounds'; : INPUT A(12) 

590 PRINT6641, "Turnovers'; : INPUT A(15) 

600 PRINTI673, "Assists"; : INPUT A(16) 

610 PRlNT8705,'Draw Offensive Fouls'; « INPUT A(17) 

620 PRINTS737, "Steals"; : INPUT A(18) 



Listing continued 
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Listing continued 

630 PRINTG769, "Blocked Shots'; i INPUT A(19) 

649 PRINT§8Bl,"Fouls*; t INPUT A(2B) I RETURN 

658 REM *« Sura statistics for each Individual player ** 

66B FOR Y-2 TO 2BiT(X, Y)-T'X,X) +A(Y) :S(Y)-S(Y > +A(Y) :NEXT Y 

678 IF T(X,4)=fl THEN T(X,5)=B ELSE T(X,5) -T(X,3)/T(X,4) «1BB 

688 IF T(X,7)-B THEN T(X,8)-B ELSE T(X,8) -T(X,6)/T (X,7) *1BB 

698 T(X,9)-T(X,3)*2+T(X,6) zT(X,13) -T(X,11 ) +T(X, 12) 

788 IF T(X,1)>8 THEN T(X,1B) -T(X,9) /T{X, 1) :T(X, 14) -T(X, 13)/T(X, 1) 

71B IF A(4)>8 THEN A(5) =A(3)/A(4) *18B 

72B IF A(7)>8 THEN A(8) -A(6)/A(7) *1BB 

73B A19)-2»A(3)+A(6) :A(1B)-A(9) :A(13) -A(ll) +A(12) :A(14)-A(13) jRETURN 

74B REM ** Forms player file name fron player number *• 

758 T$-STRS(X) :T$«RIGHT$(T$,LEN(T$)-1) t FS-" PLAYER '+TS+ '/TXT "j RETURN 

768 REM •* Open Random - Access file •• 

778 OPEN'RM,F$,42 

788 FIELD 1,2 AS QBS,2 AS FMS,2 AS FAS, 4 AS FP$,2 AS FTS,2 AS F2S.4 AS F3$,2 AS PS 

,2 AS SAS,2 AS OOS,2 AS DR$,2 AS TRS,2 AS RAS,2 AS TNS,2 AS AAS,2 AS DF$,2 AS ST$, 

2 AS BS$,2 AS POS:RETURN 

798 REM ** rset statistics in the buffer ** 

8BB RSET QBS»MKIS(A(2)) :RSET FM$-MKI$(A(3) ) iRSET PA$-MKI$(A(4) ) 

818 RSET FPS=MKSS(A(5)) iRSET FTS=MKIS (A(6) ) iRSET F2$-MKI$(A(7) ) 

828 RSET F3S-MKSS(A(8)) jRSET PS-MKIS(A(9) ) iRSET SAS-MKIS (A(18) ) 

83B RSET OOS-MKI$(A(ll)) :RSET DRS-MKIS(A(12) ) iRSET TRS-MKI$(A<13) ) 

84B RSET RAS=MKIS(A(14)) tRSET TNS=MKIS(A(15) ) iRSET AAS-MKI$(A(16) ) 

858 RSET DF$-MKIS(A(17)) :RSET ST$-MKIS(A (18) ) iRSET BSS-MKI S(A(19) ) 

868 RSET F0S-MKIS(A(28)) : RETURN 

87B REM *• PUT INFO INTO R-A FILE •« 

888 PUT l,Gi CLOSE: RETURN 

898 REM *• Sum team totals ** 

98B S(l)-l:S(2)-4 

918 IP S(4)>8 THEN S(5) -S(3)/S(4) *1BB 

92B IF S(7)>8 THEN S(8) -S(6) /S(7) '188 

93B S(9)-S(3)*2+S(6):S(1B)»S(9) «S(13)-S(ll)+S(12)iS(14)-S(13) 

948 POR Y«l TO 28 :T(21 ,Y)»T(21 ,Y) +S(Y) jNEXT Y 

958 IF T(21,4)>B THEN T(21 ,5) -T(21,3)/T(21,4) *1BB 

968 IF T(21,7)>8 THEN T(21 ,8)-T(21 ,6)/T (21 ,7) MBB 

97B IF G>8 THEN T(21 ,18) -T(21 ,9) /T(21,l) :T(21 ,14) -T(21 ,13)/T(21,1) 

98B SU-S(9) JRETURN 

998 REM •« Change S( ) to A( ) *• 

1888 FOR Y-l TO 28 :A(Y) «S(Y) :NEXT Y:RETURN 

1818 REM ** PRINT TO GAMES/TXT FILE •* 

1828 IF G-l THEN OPEN *0', 3 , "GAMES/TXT" ELSE OPEN"E", 3 , "GAMES/TXT* 

1838 PRINTI3, OSj ", ";D$j ' , * I HS; " , '; SU; ST: CLOSE: RETURN 

1048 REM •* Lprint Heading for printouts - first 4 lines •* 

1858 LPRINT* *:TS-SS+' Basketball Statistics" iGOSUB 111B 

1868 LPRINT TAB(T) TS:LPRINT TABI58) YSiLPRINT " "iRETURN 

1878 REM •* Lprint llneB 5 and 6 of most printouts *• 

1088 T$-"Coach: "+CS+" Won:"+STRS(W) +" Lost i "+STRS(L) iGOSUB 1118 

1090 LPRINT TAB(T) TS:LPRINT ' ":RETURN 

1188 REM ** Center Titles *• 

1118 T-LEN(TS) :T»INT( (189-T)/2) :RETURN 

1128 REM ** Assign temporary variables to be printed ** 

1138 T$-"Sco. Off Def Tot Reb. Trn Drw Blk" 

1148 LPRINT TAB(61) " "; TS:RETURN 

1158 T$-" I Player": RETURN 

116B T$»"G Qtr PGM PGA PG % PTM FTA FT * Pt6. Avg. Reb Reb Reb Avg. Ovr A Fou 

Stl Sht F": RETURN 
1178 T$="— "+STRINGS(21,"-") JRETURN 
1188 TS-" 



1198 
1200 
1218 
1228 
1230 
1248 
125B 
126B 
127B 
128B 
1298 
1388 
1318 
1328 
1338 
1340 
1350 
1360 
1378 
1388 

1398 
1408 
1410 
1428 
1430 
1440 
1450 
1460 
1478 
1480 
1498 
1588 
1518 
1528 
1530 
1548 
1558 
1568 
157B 
158B 
1598 
1688 



%":RETURN 



•+RIGHTS(TS,8B) :RETURN 



"jRETURN 

TS-"%%":RETURN 

TS«" \ 

TS-"M" iRETURN 

T$-" #M":RETURN 

TS-" #*#.#" jRETURN 

TS-" M.i'iRETURN 

TS-" % %" : RETURN 

TS-" % »" JRETURN 

TS»"G* Data Opponent H/A ": RETURN 

GOSUB 118B JTS-" " + STRINGS(14, "-")+■" 

TS-" ••♦I'iRETURN 

TS-"## Opponent: * % % »': RETURN 

REM •••*• Insert Paper message **•*• 

CLSiPRINT'Do you have an Epson Printer? "jGOSUB 218 jIF TS»"N* THEN 1358 

PRINT'Do you want compressed printing? "jGOSUB 21B 

IP T$-"Y" THEN LPRINT CHRS (15) jF2-l 

PRINTiPRINT'Please insert paper in your printer. "iPRINT 

PRINT'Now Press <ENTER> when you are ready to print. "i :GOSUB 17B 

PRINTiPRINT'Statlatics are now being printed." 

PRINTjPRINT'Please do NOT remove paper until the menu reappears on the" i 

PRINT'screen." jRETURN 
REM ••■■• Change it? *••** 

PRINT i PRINT'Do you wish to change it (Y/N) ?"; iGOSUB 218 jRETURN 
REM ••••• p t i n t Individual's statistics on Screen ••••• 
PRINT864, "Player: *|P$(PN); 
PRINTei93,"Quarter8j "»A(2)i 

PRINTe257,CHR$(31)|"Field Goals Madei*|A(3)j 
PRINT§289, "Field Goals Attempted!" jA(4) > 
PRINTe321,"Free Throws Made:"jA(6)» 
PRINT§353,*Free Throws Attempted! ">A(7) i 
PRINT8385, "Offensive Rebounds j"iA(11) j 
PRINT9417, "Defensive Rebounds j *;A(12) i 
PRINTe449,"Turnoversj">A(15) ; 
PRINTe481,"Assistsj"iA(16) | 
PRINT«513,"Draw Offensive Foulsj "j A(17) i 
PRINTe545,"Stealsj"jA(18) j 
PRINTS577, "Blocked Shots j"jA(19) I 
PRINT8689,"Foulsi*fA(28) I jRETURN 
CLS i OPEN " I ", 3 , "GAMES/TXT " 

FOR Yl-1 TO GiINPUT#3,0$,DS,HS,SU,STjPRINT Y1;0$;" - ";H$,jNEXT Yl 
CLOSE I RETURN 

IF F2-1 THEN LPRINT CHRS ( 18) :RETURN 
RETURN 

Ustlng continued on p. J 34 




INTRODUCING 

CHESS 
CLASSICS 



Entertaining, educational 

chess software to improve 

your chess game. 

Each disk contains 64 games 

played by masters from Mor- 

phy to Fischer and Karpov. 

Use CHESS CLASSICS to 

look at a great game and see 

if you can guess the winner's 

move. 

Built-in scoring system gives 

you an approx. US Chess 

Federation rating for your 

success in picking the right 

move. 
Available for TRS-80 Model 

I, III, 4 and 4P 
KING PAWN DISK . . $59.95 
QUEEN PAWN DISK $59.95 

BOTH DISKS $100.00 

(CT Residents add 7 1 /2% sales tax) 
Send check or money order to 

Noteworthy Software Inc. 
12 Noteworthy Dr., 
Danbury, CT 06910 



Circle 374 on Reader Service card. 



PRINTER DRIVERS 
FOR SUPERSCRIPSIT 



icjlly attach your primer 10 Super- 



I J5.ly and 

SCRIPSI1 

No need 10 Icain spec 

for info describing feature! lupported on each printer 

(underline, bold, proportional, scripts, etc.) 



n ups i t ./i~iif f B'lmerjnrer C'vx'am 

■al printer codes. Call or write 



().,. IM li <f..,.-„r I'.iNiiri Supporled. 
Cuttf Primer Drl.tr For Each Printer. 
2-1 '2 yean experience. ( uslomrr Support 
•vi or S<> earn, depending on printer. 



MSDOS UTILITIES 

TANDY 100 0. 120 0. 2000 

IBM PC/XT/AT 



R A M D I S K ••"• l*fj 

KAMUl.sk -- Use spare memory as a superfasl disk to 
speed up applications (You specify Ramdisk size) 
Appears to programs as a disk, but mves instant 
liitii, Easy to install and use. 



USER TOOL BOX \Si» 

SINGLE KEY COMMAND -- Define any teal string 
(or DOS Command) at a tingle keystroke. Press 

sinalc kev to execute command. 1 
ALPHABETIZED DIKKIOK1 DISPLAY-- View 

Directory on I screen (j column!. iflflCd. Full! 
FIND KILE •■ Search all directories for file 
DIRECTORY Dl REE - Display all subdirectory 

names in an easily readable form. 

CHANCE HLE ATTRIBUTES ~ Mint fllO. hidden, 
readonly, archive, etc. Set or reset attributes. 



FULLBACK [**» 

Finally, an easy to use backup program that keeps exact 
unagii of your files on backup floppies, cartridges, or 
hard disk. Automatically backup qjjc., several , or ALL 
subdirectories Backup modified only, or ALL files. 
Keeps perfectly organized backups - backup siructurc 
is identical to original Supports backup by date, 
multiple backup copies, large files (up to 32MB). Far 
superior to DOS BACKUP, easier to use, and much 
more reliable Absolutely a MUST for hard disk users. 



|<w 



SNAPSHOT 

Instantly snap an image of your screen for later recall 
Simple keystroke combination to save or recall screen 
images before they disappear forever. Save and load 
from a file Available from DOS and applications. 



lore ALPS To 
■ lalog. Cutto 



■ Is Available. Call or Write for ALPS 



ALPS 

1502 County Road 25 

Woodland Park. Colorado 80863 

303-687-1442 
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WINDOW 

SCREENS 



by Glen E. Sparks 

Simultaneously display multiple windows 
of text or graphics with BasicG and a high-resolution board. 



Everywhere you look these days, 
you see programs that use win- 
dows and pull-down menus. Everywhere, 
that is. except in Model III/4 Basic. But you 
Basic programmers needn't feel left 
out— with a high-resolution graphics 
board and BasicG, you can simulate a win- 
dowing environment in your own pro- 
grams. You get the ability to display 
several windows of data or graphics si- 
multaneously, manipulate pull-down 
menus, and create some dramatic ani- 
mated graphics. 

I'll explain how the windowing tech- 
nique works, and how to use the com- 
mands available to you. For illustration, 
I'll also present a complete application 
program, a pie chart generator, that uses 
four windows and a pull-down menu. 

RAM with a View 

The key to creating windows on the 
Models III and 4 is BasicG's View com- 
mand. (BasicG is the graphics Basic that 
comes with Radio Shack's high-resolution 
board.) Essentially, this command makes 
your computer act as though a portion of 
the screen, called a viewport or window, is 
in fact the entire screen. Therefore, you 
can erase or change a window without af- 
fecting the rest of the screen. You can 
write to, draw on, or clear only the last 
viewport you defined. 

When you clear a viewport, it erases 
everything underneath. You can define 
and clear viewports all day long if you 
want, stacking each new viewport on top 
of the last. Program Listing 1, Sine wave, 
and Program Listing 2. Prism Ring, create 
three-dimensional graphics effects using 
this technique (see Photos 1 and 2). You 
can also divide the screen and display win- 
dows next to each other. 

Program Listing 3. Viewport, illustrates 
using windows to display data. It paints 
the entire screen with a pattern, defines 
the center of the screen as a viewport, 
clears the viewport, and displays a mes- 
sage there. Then it repeats the process for 
a second viewport below and to the right 
of the first (see Photo 3). 

Notice that when text reaches the bor- 
der of a viewport, it wraps around, just as 
it normally does at the edge of the full- 
width screen. Also notice that the two 
viewports aren't the same size. This 
means the text wraps around sooner on 
one than on the other. In your own pro- 



grams, you'd have to include a subroutine 
to check the size of the viewport and split 
words logically where needed. 

In BasicG. you use the GLOCATE(X.Y).0 
statement instead of PRINT® to display 
text at a specific place on the screen. GLO- 
CATE defines the coordinates, and the 
command PRINT#-3 does the printing. 
The syntax is the same whether you're 
printing over the entire screen or in view- 
ports. However, once you've defined a 
viewport, the coordinate system becomes 
relative to that viewport. In Listing 3. even 
though the windows aren't in the upper 
left-hand corner of the screen, the win- 
dows' upper left coordinates are 1,1 (line 
210). You can therefore use the same sub- 
routine to put data in any window by ad- 
dressing the same X.Y coordinates. 

There's one hitch to all this: Because 
the computer treats a viewport as an en- 
tire screen, you get an error message if 
you try to write past the parameters of the 
last viewport you defined. To avoid this 
problem, I suggest you redefine the entire 
screen as a viewport when you exit a pro- 
gram that uses viewports. 

Overwriting Concerns 

As I mentioned above, defining a new 
window destroys anything under it on the 
screen. However, if you've seen commer- 
cial programs that use windows or pull- 
down menus (menus that slide down, cov- 
ering a portion of the screen without de- 
stroying it), you probably noticed that the 
areas underneath appear to be intact. You 
can do the same trick with BasicG's Get 
and Put commands. (In this case, Get and 
Put don't work as they do with random- 
access files; they're special BasicG graph- 
ics commands.) 

The statement GET(X1.X1)-(X2.Y2). 
VAR% stores a section of the screen in an 
array (VAR%) that you dimension earlier. 
Unlike the View command, this doesn't af- 
fect the screen. Also unlike View, this is a 
memory-hungry command. You might 
need a dimensioned array of 2.5K to store 
a quarter of the screen. 

Once you store a section of screen, how- 
ever, you can use the Put command to dis- 
play it over and over again with little 
memory penalty. This is useful for pull- 
down menus or for storing an area a view- 
port overwrites. Program Listing 4, Circle, 
shows how this works; it draws a circle in- 
side a box in the upper right comer of the 



screen, paints over it, and then restores it. 
Substitute PRESET for PSET in line 80 to 
restore the image in inverse video. 

You can use this technique to restore a 
portion of the screen you're going to over- 
write with a viewport. Figure out how much 
area you'll overwrite and dimension an ar- 
ray large enough to store it. The appropriate 
formula appears in your graphics Basic 
manual. In a Get statement, save a section 
of screen comparable to the area you want 
covered, then use a Put statement to re- 
store it after you use the window. 

If you're working with viewports, you'll 
have to redefine the entire screen as a view- 
port or redefine the section where you're 
restoring your data. Otherwise, you'll get 
an error message if you try to write past 
the confines of the last viewport. 

This might sound complicated, but it's 
easier done than said. Likewise pull -down 
menus. You simply design a menu and 
GLOCATE it to the screen much as you 
would a block of text on the normal 
screen. Save the menu with the Get com- 
mand in an array large enough to hold it. 
Erase the graphics screen and proceed 
with your program. 

When you need a pull-down menu, 
save the area that the menu will cover in 
another array with another Get state- 
ment. The two arrays are the same size. 
Use the Put command with the menu ar- 
ray to display the menu on the screen. 
After the menu's INKEY$ routine, replace 
the original section of the screen and erase 
the menu at the same time by putting the 
second array back where you put the 
menu. The menu shrinks away as if it had 
never been there. 

Using the methods I've described, you 
can write your own window programs 
with pull-down menus. Obviously, those 
monster multiwindow programs for MS- 
DOS machines aren't written in Basic, but 
the logic is the same. 



System Requirements 

Models III and 4 

48K RAM 

BasicG 

High-resolution board 

Printer optional 



80 Micro, December 1985 • 59 



Pie Are Not Square 

Windows is a pie chart program that 
puts the principles described above to 
work (see Program Listing 5). You can dis- 
play up to four pie charts at a time on its 
four independent windows. A pull-down 
menu lets you manipulate the display. 

When you run Windows, you'll see the 
pull-down menu form on the screen and 
quickly disappear. The program saves it 
in a Get array for later use. The input rou- 
tine now prompts you for the title of a pie 
chart: the prompt appears on the non- 
graphics screen (in all, you have five 
screens — the normal screen plus four 
graphics windows). Your title can be any 
combination of numbers and letters up to 
15 characters long. 

Next, Windows prompts you for the pe- 
riod of time the pie chart covers: the same 
input restrictions apply here. Then you 
specify how many entries, or accounts, 
you want to chart. The limit, nine entries, 
is governed by the windows' size. 

Now you choose the window where you 
want to display your data, that is, the 
chart's title and raw figures (see Photo 4). 
Type in a number from 1 to 4. Window 1 
is the screen's upper left corner. 2 is lower 
left. 3 is upper right, and 4 is lower right. 

Next, you're prompted for the number of 
a window for the pie chart itself; again, type 
in a number from 1-4. The program does 
no error-checking here to see if you type in 
the same window number for both your 
data and the chart. If you indicate the same 
number, Windows will display the data, 
then immediately erase it and display the 
corresponding pie chart. I set up the pro- 
gram this way so you can display four pie 
charts at once, one in each window. 

The next block of prompts repeats for 
each account you indicated. For each ac- 
count, you type in an account name and 
amount. The name can be up to nine char- 
acters long. The amount's upper limit is 
99.999.99. When you type in numeric 
data, don't use commas, since Windows 
reads them as delimiters. 

If you need larger amounts, you can re- 
format the program's Print Using state- 
ments. However, you'll have less room for 
the account name if you do so. 

The pie chart algorithm has a mecha- 
nism that excludes low amounts if the dif- 
ference between amounts is great. This is 
necessary for clarity's sake — some slices 
would be comparatively too small to 
chart. All amounts you input are included 
in the total column, however. Since pie 
slices are numbered, you'll be able to tell 
which amounts didn't chart. 

After you type in the last amount, Win- 
dows automatically goes to the graphics 
screen, draws all four windows, and dis- 
plays the data and chart in the windows 
you specified (see Photo 4). 

At this point, you can call up the pull- 
down menu by tapping the spacebar. It 
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So meday, our c 





In additio n to a price you can afford more easily: 

•A buy-back policy, to insure you against a good idea that turned out to be a mistake 
or even if you simply "changed your mind". J An exchange, for a new one. in the rare 
event that yours should prove to be a "lemon". 3 Credit card purchasing convenience 
for speed and safety plus 'an additional discount for eash-with-order buyers and *a 
CALL-FREE number so you can get our prices free (except Texas). "A price quote 
which has NO ROAD-FREIGHT charges added later, we pay the freight and 7 fast 



CUSTOMER SERVICE/QUESTIONS ABOUT 
YOUR ORDER and in TEXAS 1-817-573-4111 

(9 am-5 pm TEXAS TIME MONDAY-FRIDAY) 

Fort Worth Computers 

377 Plaza 

Granbury, Texas 76048 

%-CALLFREE NUMBER 



COMPUTERS and PRINTERS etc. 





FFER. 

as much. 



shipping, usually next business day. S A same-day "rush service" for late satisfaction 
and ''the assurance that repeat-customers exceed new ones means great satisfaction. 
"•References given upon request, to prove our bona-fides. 

Tandy computers are created equal. . .all retailers are not. 

Did you get "the rest of the story" before you placed your order? 

(. . .good thinking. . .) 
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FORT WORTH COMPUTERS 



(WE ARE SERIOUS ABOUT SAVING YOU MONEY) 

Located 30 miles from Ft. Worth 



For 
Latest 
Prices 



(i 8oo) 433-S-A-V-E 



Delete line 160 

Change line 580 to: 

580 LPR1NT CHRS(27):CHR$(20). 

SYSTEM "GPRT2":RETURN 

Insert line 615: 
615 SCREEN 1 

Insert line 905: 
905 SCREEN 



Figure. Modifications to Program 
Listing 5 for the Model 4. 



appears in the middle of the screen as if it 
were on a shade that someone was pulling 
down (see Photo 5). Tap the spacebar 
again and the menu disappears. 

To invoke a menu option, press the 
number key corresponding to the menu 
number on the screen. You can erase a 
window, dump the screen to the printer, 
or go back to the input subroutine. You 
don't have to erase a window that you 
plan to overwrite with a new pie chart or 
data: Windows does it automatically 
when you choose that window number 
during data entry. 

When you send your report to the 
printer, you exit to BasicG in Model 4 mode 
or exit to TRSDOS in Model m mode. 

To run Windows on a Model 4. you must 
modify Listing 5 as shown in the Figure. 

Charting Your Own Course 

The power of a window environment lies 
in its ability to display different data or 
types of data at the same time. I set up the 
windows in this program for visual effect 
and to show that a window's placement and 
size is arbitrary and not restricted to any 
one layout. Your requirements might sug- 
gest only two windows or more than four. 

I left the input section relatively simple. 
You have more than enough memory left 
over to add disk I/O routines for VisiCalc 
DIF files or data base management inter- 
faces. You should have no trouble find- 
ing ways to tailor Windows to your own 
specifications. ■ 



Glen E. Sparks is a programmer and 
a member of the Dearborn, MI, user's 
group. You can write to him at 6186 Cus- 
ter, S. Rockwood. MI 481 79. 



Related Articles 

Rowell. Dave. "Sifting Through GW-Ba- 
sic." August. 1985. p. 46. A GW-Baslc tu- 
torial that covers the View command. 
Also, see this month's installment of 
Dave's MS-DOS column, p. 92. for a Model 
1000 conversion of the Sinewave program. 
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BBBOMSY WHEEL 

New Smith Corona L-1000 



"'ue 'eiiei quality printer tor less man the cosi n< ar 
-if'ce typewriter' P'iceo $500 less than otn«r popular 
da'S, *n«e' punters' 
SALE PRICE 




FEATURES 

* ' 

* l?0 *pr 

* • .v jeat ■ tia ;, *'<e*' 

* ■ i - icnai :-~te«iace 

* . r t •• * " ■ n S Ape 



SUNLOCK SYSTEMS 
210 Conner Rd. 
Mechanicsville, VA 23111 
(804)-746-1600 

AODU10NAL PRINTER SPECIALS 



Epson 



Oklflata 



RX80 $229 
LXBO 249 
RX100 399 
FX80* 369 
FX100«499 
JX 80 499 



KL92 $369 
HL192 369 
ML84 649 
Oki'C 149 
KL93 579 
ML182 239 



ComrenCRII $359 



Cornre. Ill 599 
Star S610 239 
Star PwrTp. 329 
Str.RadxlO 519 
GefilM 15x 349 
Delta 10 359 
TO OROER CALL TOLL FREE 800 368 9191 

in Virginia can 804 3J1 9'9' 

we accept MasterCard Visa and CODs 



CHoh 7500 $239 
CItoti F10 899 
CI toh 1550 449 
Cltoh 8510 319 
Sv.Beed 550 449 
Sx.Reefl 500 379 
Epson 1S0C 899 
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TAX-PREP™ '86 

takes the pain out of taxes 
Available for use with Multiplan 
or Lotus 1-2-3 



Whether tax preparation is your 
business or you do your own, 
TAX-PREP 86 saves you money 
and time while giving you totally 
professional returns. 

Look at these features: 

• Easy to use. linked 

• IRS accept printout 22 schedules 

• Automatically computes income 
averaging, deprec & alt mm tax 

TAX-PREP '86 for 1985 returns is 
available in January tor TRS-80 Model 
4.4P. II. 12.16 (TRSDOS). CP/M. Tandy 
1000.1200.2000 $129.95. Add S3 
shipping In PA add 6% sales tax 
To order: specify your spreadsheet and 
machine Visa MC 



i ■ mwimz 

29 Bala Ave Dept. E 

Bala Cynwyd. PA 19004 

(215) 667-4064 



NEW! EZTax-PLAN PRO indiv 

& corp. tax planner for Tandy 
1000, 1200. 2000. $295 

SEND FOR FREE INFORMATION 




Photo I. Sinewave's display. 




Photo 2. Prism Ring's display. 




Photo 3. Viewport 's display. 
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Photo 4. Windows' data displays and pie charts. 



Photo 5. Windows' pull-down menu. 




Program Listing 1 . Sinewave. 

10 ' SINE WAVE DESCENDS DOWN SCREEN 

20 VIEW(0,0)-(639,239) :CLR:SCREEN 'set entire graphics screen to 
viewport and clear it 
30 055 'lower the number, the flatter the wave 
40 J=0:Z1=5:Z2=.9:A=0:B-12 
50 FOR X=A TO B STEP .15 

60 xl=20*X:Y«SIN(X) :Y1=139-C* (Y+l) 'sin wave algorithm — plot where 
boxes are to be on screen 
70 IF C<0 THEN 'if C<0 then error-send to endless loop or begin 

prog over 
80 IF J>0 THEN C=C-.04 'increasing minus off C increases spaces 
90 IF J>0 THEN Xl=Xl+2 :Yl«Yl-.01 
100 IF XK0 THEN Xl=Xl*-.l 
110 VIEW(Xl,Yl)-(Xl+Zl,Yl+Zl) ,,1:CLR 'draw actual viewport (box) 

and clear its contents thus removing hidden lines 
120 Z1=Z1+Z2:NEXT 'make boxes in wave larger to midpoint of wave 
130 Z2=-Z2:J«=J+1 'if midpoint reached then make boxes smaller-J is 

counting variable for loop 
140 IF J=2 THEN 160 'if second half wave made-go to screen holding 

loop 
150 A=12:B=23:GOTO 50 'midpoint starting variables -execute first 

part of program with new values to make second half of wave 
160 IF INKEY$="" THEN 160 

Continued on p 1 38 E\ 



Put an Amber CRT 
in Your TRS-80 

• Available in medium decay European 
Phosphor" (the standard in Europe). 

• Made with Lead/Strontium impregnated 
glass that stops X-ray emission. 

• High-contrast double dark face glass 
that also cuts U.V radiation. 

• Face of tube is etched to stop glare. 

• Easily installed. . .comes with pre- 
mounted hardware. 

• Ideal for word processing and program- 
ming, yet fast enough for games and 
graphics. 

• Warranted for one full year against man- 
ufacturing defects or tube failure. 

• Comes with a 30-day money back guar- 
antee 

• Also in green. 

Langley-St. Clair 

Instrumentation Systems. Inc 

132 W 24th St.. New York. NY 1001 1 

Call now to order your 'Soft- View'"' CRT 

from Langley-St. Clair— $99.95" 

800 221-7070 

In New York call 212 989-6876 

Please specify computer and model number when 
ordering. Dealer Inquiries Invited. 

TRS-80. TeleVideo. KayPro. Heath, DEC. Zenith IBM 
PC. and Apple III are registered trademarks of Tandy 
Corp . TeleVideo Corp , NonLinear Systems. Inc . Heath 
Co Digital Equipment Corp , IBM, and Apple Computer. 
Inc Soft-View is a Trademark ot Langley-St Clair instru- 
mentation Systems, Inc 
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TRS-80 



DISCOUNT 




Computers 

at Guaranteed 

Low Prices* 



AT0N CP/M FOR II. 12. 16 



EPSON & NEC PRINTERS 



DYSAN DISKETTES 



HAYES MODEMS 

Desert Sound, Inc. 

of California 

1-800-835-5247 

Factory Authorized Dealer 

TRS 80 is a Reg. Trademark ol Tandy Corp. 

*Call for FREE CATALOG 
and Price Guarantee 
Calif. Res. Call 619-244-6883 
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And now, 

a couple of words about high-quality 

TRS-80 software at a very low price: 



fcjUS***: »&¥££:«'< 



n tnnwd * iw§ 



Supertofl* 

3 PortaWt ***** 




jp.Rff jBorus Program this issue! 



• m 



WAD 



Utilities, tutorials, home and hobby 
applications from 80 Micro. 




If you've been shopping for soft- 
ware lately, you've discovered that 
new car buyers aren't the only ones 
who experience "sticker shock". 

For the price of one commercial 
program, you can fill your gas tank 
at least three times. Or treat a friend 
to dinner. Or buy a year's worth of 
Sunday papers. 

But with Load 80 software, you can 
spend a lot less and still wind up with 
hundreds of dollars worth of out- 
standing TRS-80 programs every 
month. 

On every Ijoad 80 cassette or disk 
(your choice!), you'll get more than a 
dozen "ready to run" programs 
listed in 80 Micro. . . tutorials, utili- 
ties, games, word-processing, and 
much more. 

Build a versatile software library, 
quickly and economically. Past issues 
have included programs such as: 

NovaCak 

... a full-featured Model 
I/III spreadsheet with all the capabili- 
ties offered on more expensive com- 
mercial products. 

Easydata 

... a 200-record data base manager 
for fast information from your 
Model I/m/4. 



Grade-A Graphics 

... a deluxe Model III graphics edi- 
tor that's loaded with options! 

And to enjoy your favorite pro- 
gram, all you have to do is "load 80" 
into your computer. It's that simple. 
No keyboarding, no debugging. You 
get complete loading instructions, 
but should you need assistance, the 
Load 80 and 80 Micro technical edi- 
tors will be glad to answer your ques- 
tions. 

Don't let software sticker prices 
stop you from building a top-notch 



library. Get a variety of winning pro- 
grams, for a fraction of the cost, with 
Ijoad 80 cassettes or disks. 

To order by the month or by the 
year, simply complete the coupon 
and drop it in the mail with pay- 
ment. 



For Faster Service, call 

© 1-800-258-5473 

On NH, please dial 1-924-9471.) 



T' 



Yes 



1 want to build an exciting and economical software 

• library with Load 80. Please send me: 



□ 1 year of Load 80 on disk for $199.97 

□ 1 year of Load 80 on cassette for $99.97 

□ Check/MO □ MC D VISA DAE 



D This month's Load 80 disk for $21 .47 
□ This month's Load 80 cassette for $1 1.47 



Card# 



Exp. Date 



.Signature 



Name 



Address 



Citv State Zip 

Prices include postage and handling. Fore ign airmail please add $1 .90 per hem or $25.1X1 per subscription. L'S funds drawi on US hanks only. 



Load 80 • 80 Pine Street • Peterborough, NH 03458 
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TECHNIQUE 



by Cary Oler 



Interrupt Anytime 

Twelve programmable interrupts — at two speeds — for Model III 

TRSDOS programmers. 



An interrupt is a hot line to your com- 
puter's mission control. It breaks 
into an executing program so the proces- 
sor can accomplish some other task, and 
it works so fast that the computer doesn't 
miss a beat. Interrupts are especially val- 
uable because they're invisible to the user. 
Most Model III programmers can't take 
advantage of interrupts because TRSDOS 
1.3 doesn't use them, except to update the 
internal clock. Program Listing 1, Break 
In, gives TRSDOS 1 .3 complete interrupt- 
handling capability. Once you install the 
program, you can run up to 12 interrupt- 
driven tasks simultaneously. 

Interrupts lend themselves to countless 
applications: type-ahead routines, printer 
spoolers. INKEY routines, and so on. I'll 
tell you how to write your own interrupt 
routines, and I'll provide you with a sam- 
ple routine that adds a Scroll command to 
Basic. 

Clock Work 

The Model Ill's clock hardware sends a 
special signal that interrupts the comput- 
er's central processing unit (CPU) so soft- 
ware in ROM can update the clock. These 
interruptions occur extremely fast— about 
every 33.333 milliseconds (ms.). 

When a clock interrupt occurs, control 
Jumps to location 4012 hexadecimal 
(hex). Under TRSDOS 1.3, location 4012 
hex simply redirects the computer to 
3018 hex, which updates the clock's time 
and takes care of other necessary chores. 
By changing the instruction at 4012, you 
can direct the computer to one of your 
own routines. For example, you could set 
up a program to trace what location in 
memory the CPU executes, or you could 
write a program that sounds an alarm at 
a certain time. 



System Requirements 
Model m 

48KRAM 

TRSDOS 1.3 

Assembly language 

Editor/asse mbler 
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Program Listing 1 . Break In. 


00150 


; 








00160 




ORG 


0FE00H 




00170 


START 


CALL 


457 


; CLEAR SCREEN 


00180 




LD 


HL,MSG1 


;GET OPTION MESSAGE 


00190 




CALL 


539 


; DISPLAY A LINE 


00200 


WAIT 


CALL 


73 


{WAIT FOR A KEYPRESS 


00210 




CP 


'E* 


;WAS ENABLE OPTION CHOSEN 


00220 




JR 


Z, ENABLE 


IIP SO, ENABLE IT 


00230 




CP 


'D' 


{DISABLE OPTION CHOSE? 


00240 




JR 


NZ,WAIT 


j IF NOT, LOOP AGAIN 


00250 




LD 


A,15 


7 TURN CURSOR OFF CHAR. 


00260 




CALL 


51 


; TURN CURSOR OFF 


00270 




LD 


A, 13 


/DISPLAY A CARRIAGE RETRN 


00280 




CALL 


51 




00290 




LD 


HL,MSG3 


/GET "DISABLED" MESSAGE 


00300 




CALL 


539 


; PRINT IT 


00310 




LD 


HL,3018H 


/ORIGINAL ROUTINE ADDRESS 


00320 




DI 




/DISABLE INTERRUPTS 


00330 




LD 


(4013H) ,HL 


{RESTORE ORIGINAL ROUTINE 


00340 




EI 




{ENABLE INTERRUPTS 


00350 




LD 


HL,0FFFFH 


{RESET HIGH RAM MEMORY 


00360 




LD 


(4411H) ,HL 


{LOCATION. 


00370 




JP 


402DH 


{EXIT TO TRSDOS READY 


00380 


ENABLE 


LD 


A.15 


{CURSOR OFF CHARACTER 


00390 




CALL 


51 


{TURN CURSOR OFF 


00400 




LD 


A, 13 


{DISPLAY A CARRIAGE RETRN 


00410 




CALL 


51 




00420 




LD 


HL,MSG2 


{GET "ENABLED" MESSAGE 


00430 




CALL 


539 


{DISPLAY IT 


00440 




DI 




{DISABLE INTERRUPTS 


00450 




LD 


HL,START2 


{INTERRUPT HANDLER 


00460 




LD 


(4013H) ,HL 


{INSTALL INTERRUPT HANDLER 


00470 




LD 


HL,START-1 


{VALUE TO PROTECT PROGRAM 


00480 




LD 


(4411H) ,HL 


{PROTECT THE PROGRAM 


00490 




EI 




{ENABLE INTERRUPTS 


00500 




JP 


402DH 


{EXIT - EVERYTHING WORKS 


00510 


MSG1 


DEFM 


'<E>nable or <D>i sable the clock interrupt routine? ' 


00520 




DEFB 


14 




00530 




DEFB 


3 




00540 


MSG2 


DEFM 


'The clock 


interrupt routine has been ENABLEDl' 


00550 




DEFB 


0DH 




00560 


MSG3 


DEFM 


'The clock 


interrupt routine has been DISABLED! ' 


00570 




DEFB 


0DH 




00580 




ORG 


0FF00H 


{PROGRAM RESIDES IN HIMEM 


00590 


SLOWl 


DEFW 


DEFALT 


{VECTORS FOR SLOW INT' S. 


00600 


SLOW2 


DEFW 


DEFALT 




00610 


SL0W3 


DEFW 


DEFALT 




00620 


SL0W4 


DEFW 


DEFALT 




00630 


SLOWS 


DEFW 


DEFALT 




00640 


SL0W6 


DEFW 


DEFALT 




00650 


SL0W7 


DEFW 


DEFALT 




00660 


SLOWS 


DEFW 


DEFALT 




00670 


FASTI 


DEFW 


DEFALT 


{VECTORS FOR FAST INT'S. 


00680 


FAST2 


DEFW 


DEFALT 




00690 


FAST3 


DEFW 


DEFALT 




00700 


FAST4 


DEFW 


DEFALT 




00710 


1 








00720 


; Start 


of interrupt handling routine 


00730 


1 








00740 


START2 


PUSH 


DE 


{SAVE REGISTERS 


00750 




PUSH 


AF 




00760 




PUSH 


HL 




00770 




PUSH 


BC 




00780 




PUSH 


IX 




00790 




PUSH 


IY 




00800 




LD 


DE.START3 


{RETURN LOCATION 


00810 




PUSH 


DE 


{SAVE RETURN LOCATION 


00820 




LD 


A, 8 


{THE FOLLOWING EXECUTES 


00830 




CALL 


FAST 


{A FAST 33.33 MILLISECOND 


00840 




LD 


A, 9 


{USER-DEFINED INTERRUPT. 


00850 




CALL 


FAST 




00860 




LD 


A, 10 




00870 




CALL 


FAST 




00880 




LD 


A, 11 




00890 




CALL 


FAST 




00900 




LD 


HL, TIMER 


{INCREMENT THE 33.333 


00910 




INC 


(HL) 


{MILLISECOND COUNTER 

Listing 1 continued 



ANYONE CAN USE OUR SOFTWARE! 




MAIL PAC II and CHECKING PLUS represent a 
new generation of computer software. Our 
software doesn't even need a manual! Any- 
one can quickly learn to use either package 
by following simple, explicit on-screen 
instructions. But, for those of you who insist 
— we've included a complete user's manual 
as well. 



(kiliai LtK>, lot. 
flMMOlvill.. «! IOWJ 




MAIL PAC II 



y*. 



MAIL PAC II FEATURES: 
High Capacity - 

Stores from one to one million names in Zip Code. Numerical or Alpha- 
betical order The only limitation is your disk storage space 

Flexibility - 

Prints your mailing list on 1 , 2. 3, or 4-across labels (with up to 5 user- 
defined lines on each label) or as a compact, user-designed directory 
The record length is completely user-defined, and each field within 
each of your records is completely variable (allowing storage of any 
number of characters for any particular address entry) Devote fields 
to telephone numbers, codes, or even special messages related to each 
particular name on tile 

Powerful — 

A built-in word processor allows you to create personalized form letters 
for each address on your list (or just a particular group of addresses). 

Ease of Use -- 

Create new mailing lists, review existing lists, handle changes of 
address, delete cancelled names, sort lists, and purge duplicate names 
from your files Complete on-screen instructions tell you in plain 
english exactly how to accomplish all of these tasks 

MAIL PAC II $99.95 



JOHN DOUGH 

I* SIMIAN BLVD 
ANONYMOUS. IN SMU) 



PAT TO I HI 

qrocr or . 



116 



FIRST N/ 



c r 



CHECKING PLUS 



.LARS 



nemo 



CHECKING PLUS FEATURES: 
Complete Check Register — 

Checking Plus stores your entire check register in a disk file, and then 
uses the data to balance your account, track your expenses, and help 
you make budget projections Review the entire checkbook, enter 
checks, deposits, fees and adjustments, mark outstanding checks when 
paid, and get an instant cash balance at any time All data can be viewed 
onscreen or printed out in report form 

Tax Preparation — 

Storage of monthly and yearly totals and other important information 
aids in income tax preparation, for your personal use or for your 
accountant 

Handles the Details — 

Store names and addresses for frequently written checks, then print 
checks to fit standard window envelopes, eliminating the need for extra 
typing You can even store any comment, explanation or other message 
(up to 255 characters) related to a particular check. 

Automatic Monthly Bill Payments — 

Enter amounts and names of payees for all of your fixed-cost monthly 
payments, and then sit back while the system automatically prints 
checks 

CHECKING PLUS $99.95 



Both Programs Require 4«K And At Least One Disk Drive (2 Drives For 
Higher Storage Capacities). And All Hard Disk Systems Are Supported 



FREE TRS-80 Mod LID & 4 programs suppled on DosPlus (minimum system) 
Complete DosPlus also available 



FOR YOUR TRS-60" • APPLE" • IBM PC" • NEC" • OSBORNE" • XEROX" • KAYPRO" • TELEVIDEO" • ZENITH" • SANYO" 
DEC" • Tl PROFESSIONAL COMPUTER" • SUPERBRAIN JR " • EPSON" • Any CP/M" Computer 

CP M-baaed Computer* mutt be equipped «'•►> Microsoft BASIC (MBASIC or BASIC-M) 
TRS-60 trademark Tandy Corp • APPLE trademark Apple Cotp IBM PC trademark IBM Corp - ATARI trademark Alan Inc - OSBORNE trademark Oaborne Corp XEROX trademark Xero. Corp 
KA/PRO trademark Non L.near Systems. Inc TElEVIOEO trademark Telev.dec Sy.lemv Inc - SANYO trademark Sanyo Corp - NEC trademark NEC Corp DEC trademark Diflitai Equipment Corp 
ZENITH trademark Zen.th Corp - Tl PROFESSIONAL COMPUTER trademark Te.as mjirumen 



SI JPE RBR AIN trademark Intertec Corp CP' M trademark Dig.UI Rev 



• EPSON trademark Epaon Corp 



OUR SOFTWARE CATALOG 

H & E Computronics, Inc.. has mailed more than 1 million 
software catalogs since 1978 Send $2 for our new 64-page 
catalog today' (We also send you our catalog FREE with 
every order) DEALER INQUIRIES WELCOME 



30-DAY MONEY BACK GUARANTEE 



ALL PfllCES a SPECIFICATIONS SUBJECT TO CHANGE "• 
DELIVERY SUBJECT TO AVAILABILITY 



•CQMPlJTRQNICS: 

50 N PASCACK RD„ SPRING VALLEY. N.Y. 10977 



ADO $3 00 FOR SHIPPING IN UPS AREAS 
ADD J4 00 FOR C O O OR NON-UPS ARFAS 
ADD $5 00 TO CANAOA & MEXICO 
ADD PROPER POSTAGE OUTSIDE OF U S 
CANADA A MEXICO 





HOUR 
24 OROER 
LINE 

(914) 425-1535 

NEW TOLL FREE 

ORDER LINE 



(800) 431-2818 
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Listing I conttnued 








00920 




LD 


A,(HL) 


;GET COUNTER VALUE 


00930 




AND 


7 


(# OF SLOW INT. TO RUN 


00940 


FAST 


RLCA 




j DETERMINE INTPT LOCATION 


00950 




LD 


L,A 


;HL - ADDRESS OF NEXT 


00960 




LD 


H,0FFH 


; INTERRUPT TO EXECUTE 


00970 




LD 


E, (HL) 


;DE - LOCATION OF THE 


00980 




INC 


L 


(STARTING 2 BYTES 


00990 




LD 


D, (HL) 


(POINTING TO YOUR INTRUPT 


01000 




POSH 


DE 


fCOPY DE INTO IX 


01010 




POP 


IX 


;IX CONTAINS A COPY OF DE 


01020 




EX 


DE.HL 


/EXCHANGE DE AND HL 


01030 




LD 


B, (HL) 


(DE - ACTUAL LOC. OF YOUR 


01040 




INC 


HL 


(INTERRUPT ROUTINE 


01050 




LD 


D, (HL) 




01060 




EX 


DE.HL 


(EXCHANGE DE AND HL AGAIN 


01070 




JP 


(HL) 


(EXECUTE YOUR ROUTINE 


01060 


REMOVE 


LD 


DE, DEFALT 


(INT. VECTOR RESET VALUE 


01090 


ADD 


CP 


12 


(IS TASK • > 12? 


01100 




RET 


NC 


(RETURN IF MORE THAN 12 


01111 




RLCA 




(GET OFFSET VALUE 


01120 




LD 


L,A 


(HL - TASK LOCATION IN 


01130 




LD 


H,0FFH 


(THE INTERRUPT TASK TABLE 


01140 




DI 




(DISABLE INTERRUPTS 


01150 




LD 


(HL) ,E 


(ADD THE TASK TO TABLE 


01160 




INC 


HL 


(BUMP THE POINTER 


01170 




LD 


(HL) ,D 


(INSTALLATION COMPLETE 


01180 




EI 




(ENABLE INTERRUPTS AGAIN 


01190 


CONST 


RET 




(RETURN TO THE CALLER 


01200 


TIMER 


DEFB 





(33.333 MS COUNTER 


01210 


DEFALT 


DEFW 


CONST 


(DEFAULT INT. LOCATION 


01220 


START3 


POP 


IY 


(RESTORE REGISTERS 


01230 




POP 


IX 




01240 




POP 


BC 




01250 




POP 


HL 




01260 




POP 


AF 




01270 




POP 


DE 




01280 




JP 


3018H 


(CONTINUE CLOCK HANDLER 


01290 




END 


START 


End 








Program Listing 2. Demo. 


00160 


J 








00170 




ORG 


0FD90H 


(HI-RAM INTERRUPT 


00180 


ADDTSK 


EQU 


0PF52H 


(ADD A TASK SUBROUTINE 


00190 


REMTSK 


EQO 


0FF4FH 


(REMOVE A TASK SUBROUTINE 


00200 


TIMER 


EQU 


0FF5FH 


(LOCATION OF 33.3MS TIMER 


00210 


I 








00220 


; Interrupt Installation procedure follows below 


00230 


1 








00240 


START 


CALL 


457 


(CLEAR SCREEN 


00250 




LD 


HL,MSG1 


(GET MESSAGE 


00260 




CALL 


539 


(PRINT THE MESSAGE 


00270 




LD 


DE,MAIN 


(POINTER OF INT. ROUTINE 


00280 




LD 


A,0 


(SLOT ASSIGNMENT 0. 


00290 




CALL 


ADDTSK 


(ADD THE TASK TO TABLE 


00300 




LD 


HL,0FD8FH 


(SET HI-MEMORY BELOW' 


00310 




LD 


(4411H) ,HL 


(PROGRAM TO PROTECT IT 


00320 




JP 


402DH 


(RETURN TO TRSDOS 


00330 


MSG1 


DEFM 


'Interrupt ONI' 




00340 




DEFB 


0DH 




00350 


1 








00360 


; This 


is the 


actual interrupt handling routine. It is 


00370 


I executed every 267.67 miliise 


conds, or so. 


00380 


1 








00390 


MAIN 


DEFW 


MAIN2 


(POINT TO MAIN ROUTINE 


00400 


MAIN2 


LD 


A, (15360+63) 


(GET CHARACTER ON SCREEN 


00410 




CP 


'•• 


(IF CHAR. AN EQUAL SIGN? 


00420 




JR 


Z, CHANGE 


(IF IT IS, CHANGE IT 


00430 




LD 


A, •-' 


(IF IT ISN'T, THEN 


00440 




LD 


(15360+63) ,A 


(CHANGE IT TO ONE 


00450 




RET 




(RETURN FROM INTERRUPT 


00460 


CHANGE 


LD 


A, '-' 


(CHANGE TO A DASH 


00470 




LD 


(15360+63) , A 


(CHANGE IT ON SCREEN 


00480 




RET 




(RETURN FROM INTERRUPT 


00490 




END 


START 


End 








Program Listing 3. Scroll. 


00170 


1 








00180 


SCREEN 


EQO 


15360 




00190 


DSPLY 


EQU 


539 




00200 


1 








00210 


; Start 


of Initialization Procedure 


00220 


1 








00230 




ORG 


0F200H 


(INITIALIZATION AREA 


00240 


STARTR 


EI 




(ENABLE INTERRUPTS 


00250 




LD 


A, (TIMER) 


(GET 33.33 MS TIMER COUNT 


00260 




CP 





(IS THE INTERRUPT WORKING? 


00270 




JR 


NZ,STRT2 


(IF SO, FINISH INIT. 


00280 




LD 


BC, 25000 


(SET COUNTER TO 25000 


00290 


LPSTRT 


DEC 


BC 


(DECREMENT COUNTER 


00300 




LD 


A,B 


(GET COUNT 


00310 




OR 


C 


(IS THE TIMER EQUAL TO 0? 


00320 




CP 


• 


(FINISHED THE LOOP? 


00330 




JR 


NZ , LPSTRT 


(IF NOT, CONTINUE. 


00340 




LD 


A, (TIMER) 


(GET TIMER COUNT 


00350 




CP 


• 


(STILL A ZERO? 


00360 




JR 


NZ , STRT2 


(IF NOT, THEN FINISH INIT 

Listing 3 continued 



Address (hex] 


Description 


4012 


Hook vector for in- 




terrupts. ROM 




hooks there every 




33.333 ms. or so. 


4411 


A 2-byte area stor- 




ing the highest usa- 




ble memory 




location. 


3018 


ROM's interrupt- 




handling routine. 


FF52 


ADDTSK subrou- 




tine. This adds a 




task to the inter- 




rupt task table. DE 




» TCB address, A 




■ slot assignment. 


FF4F 


REMTSK subrou- 




tine. This removes 




a task from the in- 




terrupt task table. 




A ■ slot assign- 




ment to remove. 


FF5F 


Timer location. 




Timer is a 33.333 




ms. counter incre- 




mented about every 




33.333 ms. 


FF00-FF17 


Interrupt task table 




area. FFOO- FFOF 




are low-speed inter- 




rupts; FF10-FF 17 




are high-speed ones. 


Table 1. Break In's routines. 



Break In gives you four interrupts at 33 
ms. Because this might be too fast for 
some applications, its remaining eight in- 
terrupts occur at a low speed of about 
267.67 ms. With Break In activated, you 
can run up to 1 2 routines at the same time 
without really affecting the clock's time. 

When TRSDOS turns off the clock in- 
terrupt, as it does for disk accesses, routines 
using the clock won't execute until TRS- 
DOS turns the clock back on. Therefore, 
TRSDOS's clock isn't always accurate. 

Installment Plan 

Break In controls your interrupt-driven 
routines, called tasks, via a task table con- 
taining the addresses of 12 interrupt slots. 
The program contains all the routines you 
need to add or remove a task from the task 
table. Table 1 shows these routines' ad- 
dresses and requirements, along with 
some other locations worth noting. 
TRSDOS increments the value of a special 
1-byte location, called the timer, by 1 
every 33.333 ms. You could use it, for ex 
ample, as a seed value for a random num 
ber generator, since it constantly changes 

Once you assemble Listing 1 to disk. 
Break In takes only a few seconds to in 
stall. When you run the program by typ- 
ing in its /CMD file name, it asks whether 
you want to enable or disable the clock 
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Interrupt routine. If you want to run inter- 
rupt-related programs, press the "E" key. 
If you've already enabled the routine and 
want to disable it. press the "D" key. 

Enabling the routine activates 12 inter- 
rupts so they're ready to run your tasks. 
It also protects your program by setting 
the high -memory bytes at 441 1 and 4412 
hex to point to the first byte below the in- 
terrupt task table. This protects the table 
and the accompanying code, except in 
programs that erase all memory regard- 
less of the high-memory setting. 

Once you enable the interrupt-handling 
routine, don't use TRSDOS's Clear com- 
mand, which clears all memory from 
5600-FFFF hex. Before using Clear, run 
Listing 1 again and disable the routine. 

Pressing the "D" key turns off the in- 
terrupt-handling routine and stops the 12 
interrupts' operation. It resets the high- 
memory locations to point to the top of 
memory (FFFF hex). 

After you run Break In, it returns you 
to TRSDOS. Now you can load your own 
task driver software. Program Listing 2, 
Demo, is a demonstration routine; it lets 
you see exactly when the interrupt exe- 
cutes. To run the routine, assemble List- 
ing 2 to disk and, with Break In enabled, 
type in Listing 2's /CMD file name. 

The message "Interrupt on!" appears on 
your screen. You should see a hyphen and 
an equals sign alternate in the screen's up- 
per right-hand corner. The character 
changes each time the interrupt executes. 

Demo gives you a low-speed interrupt, 
executing every 267.67 ms. or so. To see 
what a fast interrupt looks like, change 
line 280 of Listing 2 to LD A,8. This as- 
signs the task to the first high-speed slot, 
so it operates every 33.333 ms. Now run 
Demo again and watch what happens. 
The hyphen and equals sign should alter- 
nate extremely fast. 

Again, don't use the Clear command, 
unless you want your computer to crash. 
If the characters stop alternating, it means 
you're running a program that disables in- 
terrupts. Going back to TRSDOS Ready 
should enable them again. 

Driver Education 

Listing 2 illustrates how to write your 
own task driver. To add a task to Break 
In's task table, you must meet the follow- 
ing requirements. Register DE must point 
to a 2-byte address called the task control 
block (TCB). which contains the address 
of the driver's entry point. Register A 
must contain the interrupt's slot assign- 
ment: Slots zero to 7 represent low-speed 
interrupts, slots 8-11 high-speed. Regis- 
ter HL must be destroyed after you add a 
task. On entry to your task driver routine, 
the IX register contains the TCB address. 

Lines 240-320 represent Listing 2's ini- 
tialization routine. They set up the inter- 
rupt-handling routine in lines 400-480 and 
start it running. Lines 240-260 clear the 
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00370 




LD 


HL,NSG1 


|GET "NOT OPERATION" MSG. 


00380 




CALL 


DSPLY 


/DISPLAY IT 


00390 




RET 




/RETURN TO CALLING PROG. 


00400 


HSG1 


DEFM 


'The interrupts have NOT been activated yet!' 


00410 




DEFB 


0DH 




00420 


STRT2 


LD 


DE, POINT 


;L0C. OF ADRS OF PROGRAM 


00430 




LD 


A, 11 


/LAST HIGH SPEED INTERRUPT 


00440 




CALL 


ADDTSK 


/ADD TASK TO TASK-TABLE 


00450 




LD 


HL,0EFFFH 


/SET HI-RAM TO EFFFH. 


00460 




LD 


(4411H) ,hl 


/PROTECT THIS PROGRAM 


00470 




RET 




/RETURN TO CALLING PROG. 


00480 


1 








00490 




ORG 


4174H 


/HOOK FOR "CMD" COMMAND 


00500 




DEFW 


CNDHOK 


/REPLACE WITH NEW HOOK 


00510 








/OLD HOOK IS TO 5374H 


00520 


1 








00530 


; Start 


of Interrupt Handlinq Routine 


00540 


t 








00550 




ORG 


0F000H 




00560 


POINT 


DEFW 


START 


/LOCATION OF INT. ROUTINE 


00570 


FLAG 


DEFB 


■ 




00580 


NOTIFY 


DEFB 







00590 


LEN 


DEFB 





/LOCATION OF MESSAGE 


00600 


OPRATE 


DEFB 







00610 


LEN2 


DEFB 







00620 


COUNT 


DEFB 


3 




00630 


ADDTSK 


EQU 


0FF52H 


/ADD A TASK TO TASK-TABLE 


00640 


TIMER 


EQU 


0FF5FH 


/ 33.333 MS TIMER COUNTER 


00650 


BUFFER 


EQU 


0F300H 


j BUFFER FOR MESSAGE 


00660 


START 


LD 


A, (OPRATE) 


/GET OPERATION PERMISSION 


00670 




CP 





/CAN ROUTINE OPERATE? 


006 80 




RET 


Z 


(IF NOT, RETURN FROM INT. 


00690 




LD 


A, (16916) 


/GET SCROLL PROTECT VALUE 


00700 




CP 





/IS IT A ZERO? 


00710 




CALL 


I , PROTCT 


/PROTECT FIRST LINE 


00720 




LD 


A, (COUNT) 


/GET COUNT FOR SPEED 


00730 




DEC 


A 


/DECREMENT COUNTER 


00740 




LD 


(COUNT) ,A 


/SAVE COUNT 


00750 




CP 





/IS IT TIME FOR INTRPT? 


00760 




RET 


NZ 


/RETURN IF NOT TIME 


00770 




LD 


A, 3 


/RESET COUNTER 


00780 




LD 


(COUNT) ,A 


/COUNTER RESET 


00790 




LD 


A, (FLAG) 


/GET FLAG STATUS 


00800 




BIT 


0,A 


/BUSY PRINTING A MSG? 


00810 




JP 


Z , NOPRNT 


/IF NOT, RESET FLAGS 


00820 


PRNTNG 


LD 


HL, BUFFER 


/MESSAGE BUFFER AREA 


008J0 




LD 


A, (LEN2) 


/GET MESSAGE LENGTH 


00840 




LD 


C,A 




00850 




LD 


B,0 


/BC-MESSAGE LENGTH 


00860 




ADD 


HL,BC 


/POINT TO CHAR. TO PRINT 


00870 




INC 


A 




00880 




LD 


(LEN2) ,A 




00890 




LD 


C,A 




00900 




LD 


A, (LEN) 




00910 




CP 


c 




00920 




CALL 


Z, RESFLG 


/QUEUE NOW AVAILABLE 


00930 




LD 


(LEN) , A 




00940 




LD 


A, (HL) 


/GET CHARACTER TO PRINT 


00950 




LD 


HL, SCREEN+1 




00960 




LD 


DE, SCREEN 




00970 




LD 


BC,63 


/63 CHARACTERS TO MOVE 


00980 




LDIR 




/SCROLL THEM 


00990 




LD 


(SCREEN+63) ,A 


/SAVE NEW CHARACTER 


01000 




LD 


A, (FLAG) 


/GET FLAG STATUS 


01010 




BIT 


0,A 


/LAST CHAR. PRINTED? 


01020 




RET 


NZ 


/RETURN IF NOT 


01030 




LD 


A, (NOTIFY) 


/FINISHED CLEARING SCREEN 


01040 




CP 


2 




01050 




JR 


Z, CLRFLG 


/IF SO, RESET BIT 1 


01060 




CALL 


ADJUST 


/ADJUST TO CLEAR SCREEN 


01070 




RET 




/RETURN FROM INTERRUPT 


01080 


CLRFLG 


LD 


A, (LEN2) 


/GET CHAR. COUNT 


01090 




LD 


C,A 


/SAVE IT 


01100 




LD 


A, (LEN) 


/GET MESSAGE LENGTH 


01110 




CP 


C 


/DONE PRINTING IT? 


01120 




RET 


NZ 


/IF NOT, RETURN TILL DONE 


01130 




LD 


A, (FLAG) 


/GET FLAG STATUS 


01140 




RES 


1,A 


/RESET CLEAR SCREEN FLAG 


01150 




LD 


(FLAG) , A 


/FLAG RESET 


01160 




XOR 


A 


/ZERO A REGISTER TO 


01170 




LD 


(LBN) ,A 


/CLEAR THIS FLAG 


01180 




LD 


(LEN2) ,A 


/AND THIS FLAG 


01190 




LD 


(NOTIFY) ,A 


|... AND THIS FLAG 


01200 




RET 




/RETURN PROM INTERRUPT 


01210 


NOPRNT 


LD 


A, (FLAG) 


/GET FLAG STATUS 


01220 




BIT 


1,A 


/BUSY, BUT AVAILABLE? 


01230 




JR 


NZ , PRNTNG 


/CONTINUE PRINTING 


01240 




BIT 


2, A 


/ANOTHER WAITING QUEUE? 


01250 




JR 


Z, NONEW 


/IF NOT, RESET FLAGS 


01260 




RES 


2, A 


/RESET WAITING QUEUE 


01270 




RES 


1,A 


/RESET CLEARING FLAG 


01280 




SET 


0,A 


/BUSY PRINTING A MESAGE 


01290 




LD 


(FLAG) ,A 


/SAVE FLAG STATUS 


01300 




XOR 


A 




01310 




LD 


(NOTIFY) ,A 




01320 




JR 


PRNTNG 


/BEGIN PRINTING MESSAGE 


01330 


NONEW 


LD 


A,0 


/THE QUEUE IS EMPTY 


01340 




LD 


(NOTIFY) ,A 


/THE QUEUE IS AVAILABLE 


01350 


RESFLG 


PUSH 


AF 


/SAVE AF REGISTER 


01360 




LD 


A, (FLAG) 


/GET FLAG STATUS 


01370 




RES 


0,A 


/NOT BUSY PRINTING 


01380 




RES 


1,A 


/NOT BUSY PRINTING 


01390 




LD 


(FLAG) ,A 


/SAVE FLAG STATUS 


01400 




XOR 


A 


Listing 3 continued 
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Listing 3 continued 








01410 




LD 


(LEN) , A 


; RESET FLAGS 


01420 




LD 


(LEN2) ,A 


; RESET FLAGS 


01430 




POP 


AF 


; RESTORE AF 


01440 




RET 




; RETURN 


01450 


ADJUST 


PUSH 


HL 


;SAVE REGISTERS 


01460 




PUSH 


AF 




01470 




LD 


A, 64 


J GET LENGTH OF MESSAGE 


■ 1480 




LD 


(LEN) ,A 


jADJUST FOR SCREEN CLEAR 


■ 1491 




LD 


HL, BUFFER 




01501 




LD 


C,A 




01510 




XOR 


A 


;ZERO A REGISTER 


01520 




LD 


(LEN2) , A 


fRESET THIS COUNTER 


01530 


L00P1 


LD 


(BL) ,20H 


;PILL-IN WITH A SPACE 


01540 




INC 


HL 




01550 




DEC 


C 


;BUMP POINTERS k COUNTERS 


01560 




LD 


A,C 




01570 




CP 





; COUNTER - ? 


01580 




JR 


NZ , LOOP1 


/CONTINUE UNTIL DONE 


01590 




LD 


A, (FLAG) 


;GET FLAG STATUS 


01600 




SET 


1,A 


;BUSY, BUT AVAILABLE 


01610 




RES 


0,A 


;QUEUE IS AVAILABLE 


01620 




LD 


(FLAG) ,A 


;SAVE FLAG STATUS 


01630 




LD 


A, 2 


;BUSY, BUT AVAILABLE 


01640 




LD 


(NOTIFY) ,A 


jNOTIFY BASIC OF THIS 


01650 




POP 


AF 


; RESTORE REGISTERS 


01660 




POP 


HL 




01670 




RET 




; RETURN 


01680 


PROTCT 


LD 


A,l 


; SCROLL PROTECT 1 LINE 


016 90 




LD 


(16916) ,A 


/PROTECT IT 


01700 




RET 




/RETURN TO PROGRAM 


01710 


1 








01720 


; Start 


of hook 


routine to 


print things using interrupt 


01730 


1 








01740 


CMDHOK 


PUSH 


AF 


/SAVE CONDITION CODES 


01750 




PUSH 


DE 




01760 




EI 




/ENABLE INTERRUPTS 


■ 1770 




LD 


A, (HL) 


/GET COMMAND SYNTAX 


01780 




CP 


■ I ' 


/IS IT A VALID COMMAND? 


01790 




JR 


Z,GO0D 


/IF SO, EXEC NEW ROUTINE 


01800 




POP 


DE 


/RESTORE REGISTERS 


01810 




POP 


AF 


/RESTORE CONDITION CODES 


01820 




JP 


5374H 


/EXECUTE THE BASIC COMAND 


01830 


GOOD 


LD 


A,l 


/TURN ON THE INTERRUPT 


01840 




LD 


(OPRATE) ,A 


/SUBROUTINE 


01850 


GOOD2 


LD 


A, (FLAG) 


/GET FLAG STATUS 


0186 




BIT 


0,A 


/QUEUE AVAILABLE? 

Listing 3 continued 



screen and notify you that the interrupt is 
working. Lines 300-310 protect the inter- 
rupt from other data loading in memory. 

Line 270 loads the TCB address 
("Main") into DE. Line 390 shows you that 
Main points to Main'2. the task driver's en- 
try point. 

Line 280 loads A with the task's slot 
assignment: You have 12 slots numbered 
zero to 1 1. In this case, the slot is zero, a 
low-speed interrupt. Line 290 calls the 
routine that adds the interrupt to the task 
table, which contains the 12 interrupts' 
TCBs. Don't fool around with these loca- 
tions in memory or the program might 
crash. Finally, line 320 exits to TRSDOS 
Ready, marking the end of the initializa- 
tion procedure. 

Lines 400-480 make up the task driver 
routine. Note that when the task has exe- 
cuted, it must return from the interrupt. 
Don't ever use a jump instruction to exit 
the routine or your computer will bomb. 
Lines 450 and 480 contain the return in- 
structions, which return the processor 
from the interrupt so that the program it 
interrupted can continue running. 

To remove a task from the task table, 
all you have to do is specify in the A reg- 
ister which slot contains the task you 
want to remove, and call the REMTSK 
subroutine to do so. HL and DE are de- 
stroyed after the call to this subroutine. 
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ANNOUNCING: By far the most powerful 
BULLETIN BOARD SYSTEM for TRS-80 Models I, III and 4(111). 

"The French Connection" 

TFC 



by Phil French 



FEATURES: 



— You can select either an "open access" or a secure private-password system 
Separate private mail and general bulletin sections. 

— Easy to use but advanced "layered menu" system, with an "expert mode" also. 

— An Information Section including a modifiable Information Directory, and the 
ability to remotely edit or create Information files. 

— Special user pnviledges may be individually assigned, from Upload/Download 
access to remote sysop status. 

— Features of the system can be tailored to each individual user, such as screen 
width for word wrap, linefeed enable/disable, upload promts, special characters, 
and more. 

— Plus endless other goodies such as tree-format text entry, also all the regular 
stuff like upload/download, mail read/scan options, caller log. and lots, lots, more. 

— TFC is written in 100°': Z-80 assembly language for efficiency and security. 



INTRODUCTORY OFFER $99.50 

Bulletin Boards Systems are popping up all over these days for 
special groups, commercial use, or just general access. All you 
need to run one off your own computer is a modem and the right 
software, and that's where TFC comes in. There are many other 
BBS programs available for the TRS-80. but once you check out the 
features of TFC you'll see that there is really no comparison. Many 
of the features TFC assumes to be essential are either special 
features" or non-existent on other systems. Such as TFC's "free 
format text entry", which allows text input without an (ENTER] after 
each screen line, unlike many other systems. TFC will then format 
and wordwrap the display to any screen width from 32 to 80 
characters As well. TFC has personal "mailboxes", completely 
separate from the general bulletmg file Even If you already run a 
BBS system, you should look into the advanced features that TFC 
can provide. After all, when you can get the best why settle for 
anything less.. 



AVAILABLE FROM: 



VOICE: (416) 575-2867 
Computer (416) 575-0515 

3235 Lockport Road 
Niagara Falls, NY 14305 



FINE PRINT: 

Visa, MasterCard, check. M.O. and COD 

accepted. 

Shipping in the U.S. and Canada is FREE. 

COD orders add $2.50 for COD charges 

Special shipping and Overseas orders are 

charged actual shipping costs. 




Circle 81 on Reader Service card. 




You've Cot 



TOTAL ACCESS 



( specializing In TVS80 ' > 



Rose 



TO YOUR COMPUTER HARDWARE & SOFTWARE 
NEEDS. CALL ROSE TODAY! 



QUALITY DISK DRIVES 

These drives are complete with power supply, cover and 
external drive connector For TRS-80 Model I. III. 4. IBM 
PC and others All drives are Double Density and step at 
6ms or less SS means single head. DS is double head. 
Specify white or silver color cover lor no additional charge 
or my beautilul new Stainless Steel cover lor only $9 ad 
ditwnal Add $5 per drive shipping unless otherwise spec- 
ified All drives have a one year warranty on parts and 
labor Bare drives, that is. |ust the dnves themselves are 
also available lor those of you who don t need or want one 
ol my power supplies 

COMPLETE 3.5" - 5.25" - 8" 
DISK DRIVES 

1ea 40tk DS TEAC FD-35B in a dual case 157 

2ea 40tk DS TEAC FD-35B in a dual case 255 

lea 80tK DS TEAC FD-35F in a dual case 177 

2ea BOtk DS TEAC FD-35F in a dual case 285 

40tk SS Tandon TM 100-1 $147 

40tk DS Tandon TM100-2 157 

lea 40tk SS TEAC FD-55A .n dual case $ 127 

2ea 40tk SS TEAC FD-55A m dual case 217 

1«a 40tk DS TEAC FD-55B in dual case 137 

2ea 40tk DS TEAC FD-55B in dual case 257 

1«a. 80tk DS TEAC FD-55F in dual case 157 

2ea 80th DS TEAC FD-55F m dual case 277 

Add Jim A Hpei use lor these 8 dines 

2ea SSTM848 IE sin dual case with fan $647 

2ea DS TM848 2E s in dual case with fan 697 

BARE 5.25" A 8" DISK DRIVES 

Add 14 srupptfiq pet dr'X 
40tk SS. Full Size. Tandon TM100-1 $99 



40tk DS. Full Size. Tandon TM100 2 


119 


40tk SS. Hall-High. TEAC FD55-A 


99 


40tk DS. Half-High. TEAC FD55-B 


109 


80tk DS. Half-High. TEAC FD55-F 


129 


8 SS, Thinlme. Tandon TM848-1E 


259 


8 DS. Thmiine. Tandon TM848-2E 


333 


TRS-80 MODEL HI/4 




DISK DRIVE KITS 




Add SH sHpcng <*< •"' 





Internal drive kit complete with disk controller, 
power supply, mounting brackets, cables and all 
hardware plus step-by-step instructions This kit 
contains everything you need (except the Disk Op- 
erating System, drive and a screwdriver) to con- 
vert your cassette Model III or 4 to fast reliable 
disk operation Don't confuse this quality kit with 
the high-priced npoffs. Thousands of satisfied 
customers cannot be wrong You can join them for 

only S 189 

Same as above but with 1 -40tk SS drive 289 

Same as above but with 2-40tk SS drives . . . .388 

TRS-80 MODEL I 

DOUBLE DENSITY CONTROLLERS 

Add JJ srauprq 



Aerocomp "DDC " Really the best by lest. 

Aerocomp DDC with LDOS 

Aerocomp DDC with NEWDOS 80 v2 

OTHER DRIVE GOODIES 

Add V shipcin; 

TRSDOS 1 3 Disk & Manual for Model III 
TRSDOS 2 3 Disk & Manual for Model I 
TRSDOS 6 « Disk & Manual for Model 4 

LDOS for the Model I or III 

NF WDOS 80 v2 for the Model I or III 

2 drive cable for Model l/lll/ 4 

2 drive external cable for IBM PC 

4 -drive cable lor Model I . 

Extender cable. 7" long 

5 25" power supply 8i end . white or silver 
Samiess Steel Covers 

8" (Hiww supply. Ian & enclosure beiye 



S99 
159 
179 



$24 
24 
34 
69 
99 
24 
40 
34 
9 
59 
12 
149 



— ROSE GETS RIGHT! - 

NOW— ROSE'S 
MOD 4 CP/M 

$69 
^B^ ^9^ Complete with Manual 

Rose has latched onto this slick version of CP/M 2.2 that allows you to 
run most of your favorite CP/M programs with ease. It even lets you read 
and write other manufacturers' disk formats. What could be nicer? They 
are in stock ready for you to use and enjoy. 



TRS-80 SPECIAL EQUIPMENT 

12" Green Comp Monitor Add$10forTTL . ... 89 

12 Amber Comp Monitor Add $ 10 for TTL . 84 

1 6K 200 nsec RAM Guaranteed 1 year(8 chips) 9 

64K 200 nsec RAM Guaranteed 1 year(8 chips) 19 

64K RAM plus Genuine PAL for Model 4 29 

256K 150 nsec RAM 1 yr guarantee (8 chips) 39 

MEDIA A SUPPLIES 

5 Diskettes SSDO. Lifetime Guarantee 10pk $ 16 
5 Diskettes DSDD. Lifetime Guarantee. 10pk 19 

5 Flipsort. holds 75 Diskettes IS 

8 Diskettes SSDO. Lifetime Guarantee. lOpk 24 

8 Disketted DSDD. Lifetime Guarantee 10pk 29 

8 Flipsort. holds 50 Diskettes 22 

5 25' or 8" Head Cleaning Kit 9 

Letter Size 20 lb Tractor Paper. 2900 sheets 25 



srnppmg 

WordStar ' 3 3 (Specify MM or R/S format) $ 195 

MailMerg". SpellStar*. Stanndex**. all 3 for |ust 99 

WordStar Professional (Above 4 Progams) 275 

125 
105 
105 

■y. s 
N 

169 



DataStar * Data Entry A Retrieval 

ReportStar** Report Generator 

intoStar"" Advanced DBMS (Above 2 Programs) 

dBASE II" Complete With Disk Tutorial 

Super Utility Plus 3 2 by Kim Watt 

CP/M 2.2 for Model 4 by Monte Zuma 

Turbo PASCAL by Bor Land Requires CP/M 44 

Turbo Toolbox by Bor Land 45 

Turbo TUTOR by Bor Land 35 

Pickles & Troul CP/M 2.2m lor the Model 

2-12-16 Floppy Version 179 

Same thing but the Radio Shack Hard Disk . . 219 

CP/M & 80 COLUMN 
for your MODEL III 

No need to buy a new computer when you 
can use the Holmes VID-80 modification 
and get CP/M 2.2, 64K RAM and 80 column 
video. This kit is easy to install and requires 
no soldering. Even a dolt like you can can 
end up with a complete 64K CP/M com- 
puter with an 80 column screen that is still 
able to run all your existing Model III soft- 
ware. For the first time you will be able to 
use CP/M programs that normal people do, 
such as dBASE II and WordStar. The regular 
price of this kit is $524. Now Rose will get 
you going for only .... ftff.15 . s . h .'PP."?9. . , S 299 
I'll ship you the Holmes deal above PLUS 
WordStar 3.3 installed, complete with orig- 
nal manuals ready to run for only .... $ 399 



ORDER NOW! 
TOLL-FREE 

800-527-3582 

Orders Only Please 

Call in your order or write to us at the address 
below Texas residents call us at 214-337-4346 
and deduct $2.00 from your order but you 
should remind me cause sometimes I forget. If 
you need technical information or service please 
call the Texas number as the Toll Free lines are 
just for orders only. Prices are subject to change 
without notice and are mail order only. I accept 
AMERICAN EXPRESS, MASTERCARD and VISA 
and I will not charge your card until I ship your 
goodies. You can send a check or a money 
order. I also accept COD orders but they require 
cash or a cashier's check upon delivery. If 
shipping charges are not shown please call for 
the correct amount Add $5.00 handling charge 
if your order is less than $50.00. Shipping 
charges quoted in this ad are for the lower 48 
states only. Orders to Canadian address add 
$20 00 to pay for doing all those papers for 
customs Texans add State Sales tax. No tax 
collected on shipments outside of Texas Be 
sure you know what you are buying. 
SOFTWARE IS SOLD ON A REPLACEMENT 
BASIS ONLY - NO REFUNDS. If it is defective 
caH us for instructions Please order from me 
now— I need the money and I will not jack you 
around. I reserve the right to charge up to a ten 
percent restocking charge if you jack me around. 
All merchandise carnes the original manufac- 
turers' warranty and all repairs or adjustments 
will be made by the manufacturer or his 
designated representative. 

NEXT DAY SHIPMENT of Goods in Stock. 

TOTAL ACCESS 

P.O. Box 790276 
Dallas, Texas 75379 
214-337-4349 
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Listing 3 continued 










01870 




JR 


NZ,GOOD2 


J IF NOT, WAIT UNTIL IT IS 




01880 




CALL 


BUTTIN 


;ABORT PRESENT DUTY 




01890 




LD 


C,0 


;ZERO THE COUNTER 




01900 




INC 


HL 


jPOINT TO DATA TO PRINT 




01910 




INC 


BL 


jBYPASS THE '"' SYMBOL 




01920 




LD 


DE, BUFFER 


J POINT TO BUFFER AREA 




01930 


L00P2 


LD 


A, (BL) 


J GET A DATA BYTE TO PRINT 




01940 




LD 


(DE),A 


; STORE CHAR IN BUFFER 




01950 




INC 


BL 


;BUMP POINTERS 




01960 




INC 


DE 






019/0 




INC 


C 






01980 




CP 





;LAST CHARACTER STORED? 




01990 




JR 


Z , LOOP3 


;IF SO, THEN FINISHED 




02000 




CP 


■ ■■ 


;TERMINATER? 




02010 




JR 


Z,ADJLOP 


;IF SO, ADJUST HL POINTER 




02020 




JR 


LOOP2 


; CONTINUE UNTIL DONE 




02030 


L00P3 


LD 


A,C 


JAND STORE THE COUNTER 




02040 




LD 


(LBN) , A 


;VALUE IN STORAGE SLOT 




02050 




LD 


A, (FLAG) 


;GET FLAG STATUS 




02060 




SET 


0,A 


;WAITING FOR THE QUEUE 




02070 




RES 


1,A 






02080 




RES 


2, A 






02090 




LD 


(FLAG) , A 


;SAVE FLAG STATUS 




02100 




DEC 


HL 


; CORRECT POINTER 




02110 




POP 


DE 


; RESTORE REGISTERS 




02120 




POP 


AF 


; RESTORE CONDITION CODES 




02130 




RET 




(CONTINUE ON WITH PROGRAM 




02140 


BUTTIN 


LD 


A, (FLAG) 


;GET FLAG STATUS 




02150 




RES 


0,A 


;NOT BUSY... 




02160 




RES 


l.A 


;NOT BUSY NOW... 




02170 




LD 


(FLAG) ,A 


;SAVE FLAG STATUS 




02180 




XOR 


A 


;ZERO A TO RESET 




02190 




LD 


(LEN) ,A 


»THIS FLAG... 




02200 




LD 


(LEN2) ,A 


;AND THIS FLAG. .. 




02210 




LD 


(NOTIFY) ,A 


;AND THIS FLAG 




02220 




RET 




; RETURN TO CALLER 




02230 


AW LOP 


DEC 


DE 


; POINT TO THE '"' SIGN 




02240 




XOR 


A 






02250 




LD 


(DE),A 


;ZERO IT OUT 




02260 




INC 


DE 


; REPOSITION DE 




02270 


ADJLP2 


LD 


A, (BL) 


/CONTINUE UNTIL FOUND 




02280 




INC 


HL 


;BUMP POINTER 




02290 




CP 





;END OF COMMAND LINE? 




02300 




JR 


NZ,ADJLP2 


/CONTINUE UNTIL DONE 




02310 




JR 


LOOP3 


jFINISHED LOOP 




02320 




END 


STARTR 




End 



Take Command 

Program Listing 3. Scroll, Is a good ex- 
ample of a task driver's power. It adds a 
command to Basle, CMD!, that scrolls 
characters across the top of the screen. Ta- 
ble 2 shows Scroll's Important addresses. 

To install Scroll, assemble Listing 3 to 
disk and make sure you've enabled Break 
In. Now go into Basic and type in: 

CMD'L "."SCROLL/CMD":DEFUSR = &HF200: 
A = USR(O) 

This loads Scroll into memory and runs it. 
If you haven't enabled Break In, an error 
message appears and Scroll aborts. 

Try out the new command by typing in: 

CMD'-ABLE WAS I ERE I SAW ELBA." 

You should see the message scroll 
across the top of your screen. The pro- 
gram scroll-protects the screen's top line; 
to unprotect it, you have to turn off the 
Scroll function by typing in: 

POKE &HF005.0 

To restore scroll protection, POKE the 
same location with a value other than zero 
or invoke the CMD! command again. 

You can change the scrolling speed. For 
faster scrolling. POKE locations F007 and 
F02 1 with values less than 3 but not zero. 
The value 3 represents the original scroll- 
ing speed. To slow down the scroll. POKE 
the locations with a value greater than 3. 



Circle 216 on Reader Service card 



(&aib pug 8D 

Eliminate disk reboots and data loss due to oxi- 
dized contacts at the card edge connectors 
GOLD PLUG 80 solders to the board edge con 

nector Use your existing cables (if gold plated) 



GOLD PLUG 80 Mod I Mod 




GOLD PLUG 80 Mod I (6) 
Keyboard/ El (mod I) 
Individual connectors 
GOLD PLUG 80 Mod III (6) 

Internal 2 Dnve Cable 
Mod III Expansion port 

Available al you' 'avo'ile dealer 01 o«de« direct I'om E.A.P CO 

Dealer Inquiries Invited ^M 

VIS 

USAsfupptngSl 45 Can/Mo* $•> ^^m 

fot»ar\i? TEXAS 5S. TAX 

• fademarti Tandy Corp 



TRS-80+ MOD I, III, COCO, 
TIMEX 1000, OSBORNE, 
TI99/4a others 

COCO MODULE INSTALLATION AVAILABLE 

COCO Disk Module 

Ground tab 
extensions 







fjF 



$1695 

INCL 

$7.95 

29 95 

39 95 



COCO Disk Module (2) 
Ground tab extensions 
Disk Dnves (all R.S ) 
Gold Disk Cable 2 Dnve 
Four Dnve Cable 

C-ITOH Printers $CALL 

EBONIZE Aerosol Spray 

ribbon re-inker $1 1 .95 

ATHAN A DISKETTES 

(Lifetime warranty) $37.95/30 

(single side double density) 
GOLD PLUG 80-E.A.P. COMPANY Jfr 

P.O. Box 14 Keller. TX 76248 (817) 498-4242 ^jjjjgf 

2/12716/6000 Products CALL 
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Address (hex) 


Description 


F200 


Start of Scroll's 




initialization 




procedure. 


FOOO 


A pointer Break In 




uses to find the 




task routine's entry 




point. 


F002 


A flag byte indicat- 




ing Scroll's status. 


F004 


Contains the mes- 




sage's length. 


FX)05 


Operation permis- 




sion byte. If this is 




anything other 




than 1 , the pro- 




gram Is off. If it's 1, 




the program is on. 


4174 


Hook location for 




Basic's new CMD! 




command. 


F007 and F021 


Changing these 




values speeds up 




or slows down 




scrolling. 


F30O-FFFF 


Message buffer 




area. 


Table 2. Scroll's routines. 



but less than 256, or zero. If you decide to 
change speeds, be sure to POKE the same 
number in both memory locations. 

If you type in two messages to scroll, 
the computer waits until the first finishes 
scrolling before printing the second. 

Location F004 contains the length of 
the message being printed, which can be 
up to 256 characters. Location F006 con- 
tains the number of characters printed so 
far. When F006 equals F004, the message 
has finished printing. 

Location F002 is a flag value containing 
Scroll's status. Here's a rundown on the 
bits in this byte: 

Bit zero If set. the program is prinUng a mes- 
sage and the queue Is unavailable. 
If set. the program is scrolling a 
message off the screen, but is avail- 
able to print another message. 
If set, another message is waiting in 
the queue. When the program fin- 
ishes scrolling the first message, it 
prints the message in the queue 
and resets this bit. 
Bits 3-7 Scroll doesn't use these bits, so 

they're available for your use. 
Don't touch bits zero to 2 of this byte or 
you could really mess things up. 

Scroll keeps the message it's printing in 
a buffer at location F300 and reserves 256 
bytes for the buffer area. The scroll inter- 
rupt occupies slot 1 1 of the task table, so 
don't use this slot for another interrupt if 
you want Scroll to operate concurrently. 

RAMifications 

To run the Listings on a Model III with 
less than 48K of RAM. change their ORG 



Bit 1 



Bit 2 



addresses to appropriate values. But 
make sure that no other task drivers load 
over Listing 1 while it's running. 

You should originate Listing 1 so that 
the program's last byte loads into the 
highest possible RAM location — this gives 
you the maximum amount of free mem- 
ory. If you do change the programs' load- 
ing addresses, the POKEs and other ad- 
dresses described above won't apply. ■ 

Cary Oler has been working with 
computers for five years. You can write 
to him at Box 132. Stirling, Alberta, 
Canada TOK. 2EO. 



Related Articles 

Fisher. Douglas C. "Interrupt Your 80." 
January 1983. p. 258. Maskable and non- 
maskable interrupts for the Model I. 

Genovese. R.F.. "Multi-Programming on 
a Micro." January 1982. p. 278. A Model I 
interrupt program. 

Gorsky. Buzz. "Doing Two Things at 
Once," March 1981. p. 178. A Model I tu- 
torial on interrupts. 

Workman. Dennis. "We Interrupt This 
Program." November 1982. p. 396. Using 
interrupts to speed up the Model I. 



Holiday 3p^c:kill 

T/Maker for the Tandy 1000 
is now $299 through January 31, 1986. 



Circle 266 on Reader Service card. 



Integrated Software 

Word Processing 

Spread Sheet Analysis 

Relational Data Base Management 

Spelling Checker 

Bar Chart Graphics 

Data Encryption 



Available for: 

IBM HI. TjikIv 1000. 1200, 2000 
Requires i2hK Retail 4450 

Kaypft). Epson, Monie/unu CI' M 
Kc-i|tnrr> 64K, Keljil IhSo 

Nl » ' Mw.k-1 t 4F(TRJ>DOS6.2) 

Kr ( |iiir<-s 'viK Kri.nl 52'."' 



T/Maker Company 
2115 Landings Drive 
Mountain View, CA 94043 
41 5/962- 01 9 5 

Circle 266 on Reader Service card. 



ln| l .*..ikU|iMN<-!i..m Review KcfMJrtar*. W.NM.C NK<i lull ■ UuiU 

Kepnmed hy rK-rmmwin All nj|i«s reserved Cl 1 ^ I Mjktr U impart) 
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The Right Address 

Different versions of TRSDOS 6.X use different system memory 
addresses. Locator gives you the right addresses for Model 4 TRSDOS. 



Finding a memory address in Model 4 
TRSDOS is a bit like finding Main St. 
in five different towns; the idea is the same 
in each, but the location changes. So it is 
with memory addresses under TRSDOS 
6.X — they change with each version of 
TRSDOS. 

Locator (see Program Listing 1) deter- 
mines the correct memory addresses for 
cursor control, scroll protection, redefina- 
ble function keys, and the keyboard for 
your version of TRSDOS. It does so by 
searching low memory for the location of 
$DO and $KI and adding displacements to 
these locations to get the right addresses. 

You can store these addresses on disk so 
Basic programs can access them. Since 
the memory locations on disk are correct 
for the resident version of TRSDOS, Basic 
programs operating under control of the 
system disk will automatically use the 
proper PEEK and POKE addresses. 



Variable 


Function 


LS 




Scroll protection 


LC 




Cursor image 


1.1 




Function key 1. 
lowercase 


L2 




Function key 1. 
uppercase 


L3 




Function key 2, 
lowercase 


L4 




Function key 2. 
uppercase 


L5 




Function key 3. 
lowercase 


L6 




Function key 3. 
uppercase 


LK 




Keyboard map 


Table. 


Locator 


5 subroutine saves 


memo 


ry addresses to these va.fi- 


ables. 







System Requirements 



Model 4/4P 

32KRAM 

TRSDOS 6.X 



To further facilitate programming, I've 
included a Basic subroutine (see Program 
Listing 2) that copies the addresses on the 
system disk to the program variables in- 
dicated in the Table. To accomplish this. 



you execute a GOSUB command to the 
subroutine.! 

You can write to Maurice Dyke at P.O. 
Box 32077, Aurora, CO 80041. 





Program Listing I. lux-ator. 


10 


'LOCATOR BASIC PROGRAM BY M. DYKE 


20 


N-0:JK-0:JV«0 


30 


FOR J - 1 TO 5000 


40 


JP - PEEK (J) 


50 


IF N <> THEN 150 


60 


IK PEEK (J) <> 84 THEN 150 


70 


IF PEEK(J+1) <> 82 THEN 280 


80 


IF PEEK(J+2) <> 83 THEN 280 


90 


IF PEEK(J+3) <> 68 THEN 280 


100 


IP PEEK(J*4) <> 79 THEN 280 


110 


IF PEEK(J+5) <> 83 THEN 280 


120 


IP PEEK(J+6) <> 54 THEN 280 


130 


N « PEEK(J+7) 


140 


GOTO 280 


150 


IF JP <> 36 THEN 280 


160 


Jl - PEEK(J+1) 


170 


IF JK O THEN 230 


180 


IF Jl <> 75 THEN 230 


190 


IF PEEK(J+2) <> 73 THEN 280 


200 


JK = J 


210 


IF JV <> THEN 330 


220 


GOTO 280 


230 


IF JV <> THEN 280 


240 


IF Jl <> 68 THEN 280 


250 


IF PEEK(J+2) <> 79 THEN 280 


260 


JV = J 


270 


IF JK <> THEN 330 


280 


PRINT "CHECKING LOC ",J 




NEXT J 


300 


CLS 


310 


PRINT 'MEMORY SEARCH NOT SUCCESSFUL FOR OPERATING SYSTEM IN USE" 


320 


GOTO 520 


330 


CI.S 


340 


PRINT "SOME USEFUL MEMORY LOCATIONS IN TRSDOS 6.";CBRS(N) 


350 


PRINT " " 


360 


PRINT " SCROLL PROTECTION: ";JV+7;" ( POKES 9-15 )" 


370 


PRINT " CURSOR CHARACTERi ";JV+11 


380 


PRINT " LC Fl CHARACTER: ";JK+35 


390 


PRINT " UC Fl CHARACTER: ";JK+36 


400 


PRINT " LC P2 CHARACTER: *;JK*37 


410 


PRINT " UC F2 CHARACTER: ";JK*38 


420 


PRINT " LC P3 CHARACTER: ";JK*39 


430 


PRINT " UC F3 CHARACTER: ";JK+40 


440 


PRINT "KEYBOARD MAP START: ";JK+11 


450 


PRINT " KEYBOARD MAP END: ";JK+18 


460 


LINE IKFOT'EHm Y TO SAVE ON DISK FOR USE BY OTHER BASIC PROGRAMS ";YS 


470 


IF Y$ <> "Y" THEN 520 


480 


OPEN "O",1,"SYSLOC/TXT:0" 


490 


WRITE* 1, JV+7,JV+ll,JK + 35,JK*36,JK + 37,JK + 38,JK + 39,JK-<-40,JK + ll 


500 


CLOSE 1 


510 


PRINT'DATA STORED IN FILE 'SYSLOC FOR USE BY OTHER BASIC PROGRAMS" 


S20 


END r^ J 




End 
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Program Listing 2. Basic subroutine to copy variables. 

65000 "PROGRAM FILE "GETLOC" A SUBROUTINE BY M. DYKE FOR INCLUSION IN OTHER BASI 
C PROGRAMS TO GET MEMORY LOCATIONS STORED ON SYSTEM DISC BY PROGRAM "LOCATOR" 
65010 'LC-CURSGR LS-SCROLL PROTECTION Ll-FlLC L2-F1UC L3-F2LC L4-F2UC L5«F3LC 

L6-F3UC LK=KEYBOARD MAP 
65020 ON ERROR GOTO 65030: OPEN "I", 1, "SYSLOC/TXT: 0" : ON ERROR GOTO 0: INPUT * 
1, LS,LC,Ll,L2,L3,L4,L5,L6,LK: CLOSE 1: RETURN 

65030 PRINT'PROGRAM •LOCATOR' MUST BE EXECUTED BEFORE CURRENT PROGRAM CAN BE RUN 
*: RESUME 65040 
65040 END ... 



Circle 65 on Reader Service card 









CONVERT 
OD I/III BASIC PROGRAMS and FILES 

For Use On The 
IBM PC, TANDY 1000, 1200HD, 2000 



Here's time and money saving news for thousands of TRS-80 Mod I and Mod 111 owners who would love to move up to state-of-the-art 
hardware! EMSI's conversion package contains utilities to solve both problems facing those who want to upgrade: 

PROBLEM 1— HOW DO I GET FROM HERE (Mod I/III) TO THERE (PC)? Do I need 
to retype everything, buy modems, RS232's, cables, and communications software? 

ANSWER: None of the above! Use the HYPERCROSS utility included with our package! HYPERCROSS makes the entire disk transfer 
process Wty simple— and fast. All the work is done right on your Mod I/III. HYPERCROSS lets you format a diskette readable by all 
n one drive and copy files directly to it from a Mod I/III diskette. After the transfer, take the PC diskette out of your Mod I/III and 
put it in your PC. Simple as that! (Mod I's need a doubler.) 

PROBLEM 2— ONCE I'M THERE, HOW DO I CONVERT MY MOD I/III 

PROGRAM TO RUN ON A PC? 

ANSWER: Use our CNV3TOPC utility to do 95% or more of the conversion for you. It automatically inserts all required spaces between 
keywords, replaces PRINT@'s (even those with variables) to IOCATE's, adjusts TAB addresses, corrects the exponentiation symbol, 
replaces the °'o symbol in USING statements with a backslash, removes down arrows, optionally removes REM's and flags and lists un- 
resolved line numbers. It even allows for Mod l/III screen PEEKs and POKEs. 

And, our thirty page user guide is packed with examples and hints showing how to make any manual program changes required after 
Using CNV3TOPC. 

". . . // i the best such program I 've seen, well worth it 's higher price over similar programs. . . The con version program performed flawlessly. ' ' 

Mr. Gary Shade, 80 MICRO. May 1985 (4'_ stais) 

Customer comments: 

"Truly, a Superior Quality Software Package. Count me among your list of satisfied customers. ' ' 

Waltham, MA 

"I would gladly recommend the package to anyone making the change "The fine points of conversion you cover in the manual 

to an IBM type machine. ' ' are excellent. ' ' 

Wauwatosa, WI Salem, OR 

"What a time saver. Thanks for a great product." "An excellent product . Thank you for the sen ice." 

Denver, CO Mapa, CA 

"Excellent! The manual alone. . .is worth the price." "Works like a charm! Congratulations." 

Wcstport, CT Odenton, MD 

CONV3TOPC V2.0 $139.95 

(Package includes: HYPERCROSS and CNV3TOPC) 

AVAILABLE WORLDWIDE through Radio Shack's Express Order Software (Cat.No. 90-0345) 
OTHER EMSI SOFTWARE 



THE NORTON UTILITIES LIST $99.95, OUR PRICE $59.95 



CONV3TOPC V2.0— (WITH Hypercross) $139.95 

< ONV4IOPC V1.0— (WITH HYPERCROSS) $139.95 

Same as CONV3TOPC V2.0. but 

specifically for mod 4 BASK" and FILES 
( ONV3IOPC V2.0 DEMO (Runs on any PC) $20.00 

HYPERCROSS— Mod I/III. PC-DOS formal $49.95 

( ROSS REFERENCE— lor PC BASIC $24.95 

programs. Lists all referenced variables. 

line numbers, etc. 
US I SORT Machine language SORT $24.95 

callable from PC BASIC. Great PC subst.for Mod III 

BASICS CMD"0" command. 
PEEKs 'n POKEs-Ovcr 50 utilities $29.95 

that enable PC BASIC programs to access and modify 

PC/MS DOS system functions. 
BASIC DEVELOPMENT SYSTEM (IBM PC ONLY)— Productivity Tools for BASIC programmers. 

It >ou writs BASICA programs for a living, you'll wonder how you ever got along without this package. 

Guaranteed to vastly reduce development time! 



CONV3TOPC V2.0 (WITHOl. 1 Hypercross) 
CONV4TOPC V1.0— (WITHOUT HYPERCROSS) 
( ONV3T04— Mod I/III to Mod 4 BASIC 
HYPERCROSS— Mod 4, PC-DOS formats 
ISAM ROUTINES— Incorporate these routines 

in your PC BASIC programs. They provide keyed 

access to random files & complete file maim. 
RAMDISK — Create superfast pseudo disk drive 

(eg. create a 90K RAM drive C: and still have 60K for 

BASIC on 256K PC). 
INSIDE TRACK— Over 60 PC utilities that 

compliment PEEKs 'n POKEs package. Too many 

functions to mention. 



$119.95 

$119.95 

$49.95 

$49.95 

$69.95 



$49.95 



$44.95 



$124.95 



800-922-0786 

(NJ residents 201-897-5982) 



EDUCATIONAL MICRO SYSTEMS, INC. 

PO Box 471, Chester, New Jersey 07930 



EMSI direct order terms: VISA, Mastercard. MO. check or COD. Add S3.00 shipping/handling. Add SI. 90 for COD. 
Foreign or first class, add first class postage (package wt. 2'-, lbs.). NJ residents add 6% sales tax. 
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GRAPHICS 



by Dale Elton Rogerson 



Rembrandt Redux 

Our hi-res MacPaint-like program revisited — with screen dump 
routines for Epson printers and some TRSDOS 1.3 patches to BasicG. 



I like 80 Micro's high-resolution Mac- 
Paint-style graphics program, Rem- 
brandt. ("Drawing in Detail," September 
1985, p. 56), but Model III owners can't 
execute BasicG's GSAVE, GLOAD. or 
GPRINT commands from within Rem- 
brandt; it returns control to TRSDOS 1.3 
if you do so. In addition, you can't use 
Rembrandt with an Epson printer. I'll 
show you how you can do both. 

To fix Rembrandt for operation under 
TRSDOS 1.3. add these lines to the program: 

1GOT05 

2 FOR I = 1 TO LEN(FI$):POKE - 249 + 1 - 1.ASC 
(MID$(FI$.1. 1)) :NEXT:X - USR(0): RETURN 

5 CLEAR500:FOR 1-0 to 6:READ A:POKE 
&HFFOO + I.A :NEXT :DEFUSR -&HFOO 
:DATA 33, 7. 255. 205. 156, 66, 201 

Also, you have to change some Rem- 
brandt lines to those in the Figure. This 
adds a small machine-language program 
that uses the CMDDOS call (429CH) to ex- 
ecute a TRSDOS command. You should 
set memory size to 61439 (0FO00H) since 
this is where the graphics routines load. 

The screen print routines that come 
with BasicG don't work with Epson print- 
ers. I modified the routines in the BasicG 
manual to work on the Epson MX-80 and 
FX-80. Program Listing 1 prints the 
screen with the X axis down the page and 
the Y axis across it; i.e., I rotated the 
screen 90 degrees. The routine prints the 
dots on the Y axis twice. 

Program Listing 2 prints the X axis 
across the page and the Y axis down it. 
Neither of these routines use BasicG's 
screen, ROM, or supervisor calls. 

The routine to initialize the Model III 
graphics board is in the TRS-80 Computer 
Graphics Operation Manual, Radio 
Shack catalog #26-1125. pp. 89 and 90. 
Insert lines 125-154 from the manual 
where indicated in Listings 1 and 2.B 

You can write to Dale Elton Rogerson at 
1123B McMillian St., Atlanta, GA 30332. 



System Requirements 
Model m 

64KRAM 

BasicG 

High-resolution board 



Program Listing 1 . Epson screen dump routine that prints the X axis down 
a page and the Y axis across. N.B.: You must Insert several lines where 
indicated from an initialization routine in your BasicG manual. 



F000 
F000 
F001 
F002 
F003 
F005 
F008 
F00A 
F00C 
F00F 
F011 
F014 
F015 
F017 
F019 
F01C 
F01D 
F01E 
F020 
F021 
F022 
F024 
F025 
F028 
F02A 
F02D 
F02E 
F031 
F034 
F035 
F037 
F038 
F03A 
F03C 
F03F 
F040 
F042 



E5 

D5 

C5 

DDE5 

CD0000 

3E51 

D383 

219SF0 

0603 

CD45F0 

23 

10FA 

0650 

2192F0 

78 

3D 

D380 

AF 

4F 

D381 

C5 

CD4FF0 

DB82 

CD5DF0 

77 

CD45F0 

CD45F0 

•C 

3EF0 

B9 

20EE 

360A 

CD45F0 

CI 

10DA 

C378F0 



F045 DBFB 
F047 FE3D 
F049 20FA 
F04B 7E 
F04C D3FB 
F04E C9 

F04F E5 
F050 218EF0 
F053 0604 
F055 CD45F0 
F058 23 
F059 10FA 
F05B El 
F05C C9 

F05D 3298F0 
F060 AF 
F061 0601 
F063 118000 
F066 3A98F0 
F069 A3 



00000 

00001 
00002 
00003 
00004 
00005 
00006 
00007 



00009 

00010 

00011 

00012 

00013 

00014 

00015 

00016 

00017 

00018 

00019 

00020 

00021 

00022 

00023 

00024 

00025 

00026 

00027 

00028 

00029 

00030 

00031 

00032 

00033 

00034 

00035 

00036 

00037 

00038 

00039 

00040 

00041 

00042 

00043 

00044 

00045 

00046 

00047 

00048 

00049 

00050 

00051 

00052 

00053 

00054 

00055 

00056 

00057 

00058 

00059 

00060 

00061 

00062 

00063 

00064 

00065 

00066 

00067 

00068 

00069 

00070 

00071 

00072 

00073 

00074 



EPSON SCREEN DUMP 1 
by 
Dale Rogerson 
March 84 
For Hi-Res Board (III) 
Complete re-write of GPRINT. 
Dumps screen to an Epson printer: 
FX-80, MX-80, RX-80 or compatible. 
Prints Y axis across page with 
each screen line printed twice. 
This dump fills a whole page. 



SETUP 
SETUP 2 

FORX 
F0RX2 



GRA001 



ORG 

PUSH 

PUSH 

PUSH 

PUSH 

CALL 

LD 

OUT 

LD 

LD 

CALL 

INC 

DJNZ 

LD 

LD 

LD 

DEC 

OUT 

XOR 

LD 

OUT 

PUSH 

CALL 

IN 

CALL 

LD 

CALL 

CALL 

INC 

LD 

CP 

JR 

LD 

CALL 

POP 

DJNZ 
JP 
-Print 

IN 

CP 

JR 

LD 

OUT 

RET 
— Put 

PUSH 

LD 

LD 

CALL 

INC 

DJNZ 

POP 

RET 
-Rever 

LD 

XOR 

LD 

LD 

LD 

AND 



;Save the Regs 



0F000H 

HL 

DE 

BC 

IX 

INITG ; Initialize Graphics 

A, 81 ;01010001H Inc X on Read i write 

(STATUS) , A ;Set Status 

HL,NUMPIN ;Set Printer for 8 pins 

B,3 ;3 bytes 

PRINTA ; Print byte 

HL ;Get next byte 

SETUP2 ;Go print again 

B,80 ;B=number of columns to Print 

HL, BUFFER; HL--> Buffer 

A,B jA-B 

A ;Column t ■ B-l 
(X) ,A ;Set X position 
,A-0 

;C= line t (screen) 
;Set y position to 
;Save t of columns 
; Put printer in Graphics mode 
j Get Byte 

;Byte backwards-Reverse 
7 Put Byte into HL 
; Print Byte 
j Print Byte again 
;Inc Line I 
;A>last screen line t 
;At last screen line? 
;If not print next byte 
; Print a line feed 



A 

C,A 
(*),A 
BC 

GRANOD 
A, (GRAPH) 
REVERS 
(HL),A 
PRINTA 
PRINTA 
C 

A, 240 
C 

NZ , FORY 
(HL),0AH 
PRINTA 

BC ;Get counter 
F0RX2 ;Do next printer line 
BYE /Finished so go end it 
a Byte 

A, (251) /Check Printer Status 

61 ; Ready? 

NZ, PRINTA ;Check again if not 

A, (HL) ; Print Byte 

(251), A 

; Return 
Printer in Graphics Mode 
HL 

HL,BGM0DE 
8,4 

PRINTA 
HL 

GRA001 
HL 



;Save the byte 
;ZER0 A 



se the Byte in A 
(XL0C),A 
A 

B,l 

DE,80H ;D - New Byte/E 
A, (XLOC) ;Get byte back 
E ;Use mask to get bit 



Mask Byte 



Listing 1 continued 
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THE STATE OF THE ART 

The C.ITOH 3500 is fully IBM/Tandy 1000-1200-2000 compatible and 
FAST. Using bidirectional, logic-seeking printing across a full width of 
13.2 inches, this little beauty prints at a speed of 350 characters per 
second (CPS). Letter quality printing is available at a rapid 87 CPS— 
more than twice the speed of most daisywheel printers. Couple that 
with a quick linefeed of 30 milliseconds per line and a standard buffer 
of 2K (16K optional, $50) and you have just about the fastest through- 
put around. Only 4.7" high and a low noise level of 58 dBA. 

Maximum versatility is offered for data and wordprocessmg output, spreadsheets 
and business graphics by a variability of print densities, speeds, character sets 
and fonts, spacing, forms control and other attributes realized by operator and 
computer alterable functions, allowing the printer to be tailored to almost any 
application. 

We could rave on and on about this fantastic printer but the proof is using this 
printer in your application Try it on our 14 day money-back -if-not-satisfied plan 
Don't be printer bound any longer. Call today. 




350 CPS only $1695 

(Please Specify Serial or Parallel) 
(Shipping Included) 



CaUU^LrTl 



DIGITAL PRODUCTS 




$229 

List $299 



(Add $10 S & H) 



Low Profile Design 
ONE YEAR WARRANTY 



ProWrtttr^ Jr. Near letter quality 
and 105 CPS for data processing. 
Compatible with all popular PCs 
Built-in stand, easy tront paper 
loading The low cost answer for 
professional performance 



StarWrfter™ Y-10. F-10 40/55. 
Daisy wheels with speeds rang- 
ing from 22 to 58 CPS for the 
sharpest in letter quality printing. 
13.5 and 15-inch carriage widths 
Switch-selectable pitches 10.12, 
and 15. Compatible with all pop- 
ular word processing software. 







As Low As $899 

(Add $15 S & H) 



F10-40 15" wide 40cps Diablo/Qume printwheels. . . $899 

F10-55 Fastest DW printer at 58cps 15" wide $999 

F10 Bi-Directional Tractor $199 

F10 Mechanical sheet feeder $299 




As Low As $299 

(Add $12 S & H) 



ProWriter'- 8510S/1550S* 
NLQ Series Dot Matrix Printers. 

Near letter quality, 180/120 CPS 
with throughput speeds of up 
110 LPM for far faster text and 
graphics than competitors. 
Models specifically designed to 
provide the finest performance 
and flexibility with IBM* and Ap- 
ple*/Macintosh* microcomputers 



8510 BPI IBM Graphics. 120cps 10" friction/tractor $299 

8510 SEP IBM Graphics, NLQ and faster at 180cps . $399 

8510 CEP IBM Graphics, 180cps plus 7 colors $499 

1550 EP 15" wide 120cps friction/tractor included $499 

1550 BCD Like above but RS232 interface SPECIAI S299 

1550 SEP 15" IBM Graphics NLQ and a fast 180cps $599 



ProWriter'" 24LQ. The Ultimate 
Printer. 24-pin dot matrix printer. 
6 printers in 1 for all professional 
printing needs. 200 CPS for 
data, 133 CPS memo quality, 67 
CPS letter quality. Selectable 
type styles Up to 7-color graph- 
ics at 360 x 360 DPI. 



$999 



(Add $15 S & H) 



List $1299 



cATTl R LL TO F D RfE 800-527-0347/800-442-1 31 



5JE&& 




P.O. Box 32027 
Redbird Airport, Hangar #8 
Dallas, TX 75232 
214-339-5104 



Copyright 1985 Montezuma Micro. All Rights Reserved Prices and specifications subject to change without notice. 



s© 22 m 
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SOTA now offers incredible choice - choose 
figFORTH, FORTH 79 or FORTH »3 for your 
Model I. Model III. Model 4/4P or Tandy 
1000/1200 All implementations offer a complete 
string handling package, floating point, screen 
editor and beginners tutorial Make your 
selection and join the FORTH revolution today 1 
D check here to order F0HTH © $89.95 

choose 1 of GfiqfORTH □ FORTH 79 QF0RTM83 
choose 1 of D Model I □ Model III □ Model 4 

□ Model 4p D Tandy 1000 □ Tendy I ZOO 



Create imaginative displays with the 
sophisticated screen editor using graphics, text, 
and designe s display font Then you can let 
designe do its job -- creating BASIC or 
ASSEMBLER source files which you can 
incorporate in your programs to automatically 
display the screen you created Perfect for giving 
your programs that professional touch' Run with 
either TRSDOS 6 2 or DOSPLUS 4 on a Model 4/4P 
D check here to order dciigne © $39.95 




The ultimate disk utility for the TRS-60 Model 
4/4P Copy & modify disk files and sectors 
Works with single or double sided drives, single 
or double density diskettes Reads and writes 
Model I, Model III and Model 4 TRSDOS, LDOS, 
NEWDOS, DOSPLUS and CP/M 2 x or CP/M Plus 
diskettes We ve also included at no extra charge, 
2 more programs - PASFIZ and FASTBACI and 
all of them run with TRSDOS 6 2 or DOSPLUS 4 
D check here to order microZap e> $49.95 



• j »Si 



>abticA 



The most powerful, affordable BBS ever offered 
Minimum disk access, lightning fast response, 
large message and user base Requires a 12oK 
Model 4 or 4P running TRSDOS 6 2 or DOSPLUS 4 
and supports an popular modem types Try 
before you buy' Call the SOTA BBS at (604) 
668-5061 • 6pm to 9am (pacific time) 

□ check here to order fasl80 g> $59.95 



ORDER FORM 



INSTRUCT 1 0NS: Check afT the product! you wh to 
order and remit this ad together vith the total amount 
(in US Fundi) 



GENTLEMEN: Rush me my order 1 

O Enclosed is my □ check O money-order 

D Please bill my D VISA D MasterCard 



nHITlE: 

STHEET: 

CITY/TOWn:. 

STATE: 

CBHDTYPE:_ 
CHRDI10: 



.ZIP: 

EXPIRY: 



SIGI1RTURE: 



ORDER 
TODAY 



213-1080 Broughton Street 
Vancouver, British Columbia 
Canada • V6G 2R8 




Listing 1 


continued 














F06A 


EA70F0 


00075 




JP 


PE.NXTONEiGo if bit not set 




F06D 


78 


00076 




LD 


A,B 


;Get Mask Byte 




F06E 


B2 


00077 




OR 


D 


;Merge with New Byte 




F06F 


57 


00078 




LD 


D,A 


;Put New byte into D 




F070 


CB0B 


00079 


NXTONE 


RRC 


E 






F072 


CB00 


00080 




RLC 


B 


■Done all bits and back to 77 








00081 




JR 


NC,START;Go to start if not all done 




F076 


7A 


00082 




LD 


A,D 


jPut new byte into A 




F077 


C9 


00083 
00084 




RET 


Printer 


; Return 
to Normal t End Program 














F078 


2193F0 


00085 


BYE 


LD 






F07B 


0602 


00086 




LD 


B,2 






F07D 


CD45F0 


00087 


BYE2 


CALL 


PRINTA 






F080 


23 


00088 




INC 


BL 






F081 


10FA 


00089 




DJNZ 


BYE2 






F083 


3EFC 


00090 




LD 


A,0FCH 


;Set Options 




F085 


D383 


00091 




OUT 


(STATUS) ,A 




F087 


DDE1 


00092 




POP 


IX 


;Get Regs 




F089 


CI 


00093 




POP 


BC 






F08A 


Dl 


00094 




POP 


DE 






F08B 


El 


00095 




POP 


HL 






F08C 


AF 


00096 




XOR 


A 






F08D 


C9 


00097 
00098 




RET 

-Data 










0080 




00099 


X 


EQU 


80H 






0081 




00100 


Y 


EQU 


81H 






0082 




00101 


GRAPH 


EQU 


82H 






0083 




00102 


STATUS 


EQU 


83H 






F08E 


IB 


00103 


BGMODE 


DEFB 


27 


,-Graphics mode 




F08F 


4B 


00104 




DEFB 


'K' 






F090 


E0 


00105 




DEFB 


224 






F091 


01 


00106 




DEFB 


1 






0001 




00107 


BUFFER 


DEFS 


1 






F093 


IB 


00108 


EGHODE 


DEFB 


27 






F094 


40 


00109 




DEFB 


■ e- 






F095 


IB 


00110 


NUMPIN 


DEFB 


27 


;Set number of Pins 




F096 


41 


00111 




DEFB 


'A' 






F097 


08 


00112 




DEFB 


8 






F098 


00 


00113 


XLOC 


DEFB 













00114 




-Initial 


ize Graphics Board-Found in Manual 




1 






00115 


! insert lines 


125-154 


of the Initialization routine 








00116 


; page 


89-90 of 


the TRS-80 Computer Graphics Operation 








00117 


; Manual. Radio Shack 


Catalog # 26-1125. 




F000 




00155 




END 


GPRINT 




End 



Program Listing 2. 


Epson 


screen dump that prints the X axis across page 


and the Y axis down. N.B 


.: You 


must insert several lines where Indicated 


from an initialization routine in 


your BasicG manual. 






00000 












00001 


;****** 


•a***************************** 






00002 




EPSON SCREEN DUMP 2 * 






00003 






by * 






00004 






Dale Rogerson * 






00005 






May 85 * 






00006 


;* For Hi-Res Graphics board (III)* 






00007 


; * Comp 


lete re-write of GPRINT. * 






00008 


;* Dumps screen to an Epson Printer * 






00009 


7* FX-80,MX-80,RX-80 or Compatible. * 






00010 


j* Prin 


ts X axis across page. * 






00011 


.****** 


«•****< 


************************ 






00012 








F000 




00013 




ORG 


0F000H 


F000 


E5 


00014 


GPRINT 


PUSH 


HL ;Save registers 


F001 


D5 


00015 




PUSH 


DE 


F002 


C5 


00016 




PUSH 


BC 


F003 


DDE5 


00017 




PUSH 


IX 


F005 


CD0000 


00018 




CALL 


INITG /Initialize Graphics 


F008 


3ED1 


00019 




LD 


A, 209 ;11010001B - inc y on read 


F00A 


D383 


00020 




OUT 


(STATUS) ,A /Set options 


F00C 


210DF1 


00021 


SETUP 


LD 


HL, NUMPIN ;HL==> ESCA8' 


F00F 


0603 


00022 




LD 


B,3 ;Sets t of pins to 8 


F011 


CDD9F0 


00023 


SETUP2 


CALL 


PRINTA ;Send to printer 


F014 


23 


00024 




INC 


HL 


F015 


10FA 


00025 




DJNZ 


SETUP2 


F017 


DD2112F] 


00026 




LD 


IX,SCRBUF ;IX » 8 byte buffer 


F01B 


0E82 


00027 




LD 


C.82H ;PORT 


F01D 


AF 


00028 




XOR 


A ;Zero A 


F01E 


3211F1 


00029 




LD 


(POSY), A ;Set Y position to 


F021 


061E 


00030 




LD 


B,30 ; NUMBER OF PRINTER LINES 


F023 


C5 


00031 


OUT 


PUSH 


BC ;SAVE NUMBER 


F024 


CDE3F0 


00032 




CALL 


GRAMOD ; Printer in Graphics mode 


F027 


211AF1 


00033 




LD 


HL,PRTBUF ;HL 


F02A 


AF 


00034 




XOR 


A ;ZERO X POSITION 


F02B 


3210F1 


00035 




LD 


(POSX),A ;SAVE IT 


F02E 


0650 


00036 




LD 


B,80 ;B=t of Columns to Print 


F030 


C5 


00037 


MIDDLE 


PUSH 


BC ;Save count 


F031 


3A10F1 


00038 




LD 


A, (POSX) ;Get x-position 


F034 


D380 


00039 




OUT 


(80H) ,A ;Set it 


F036 


3A11F1 


00040 




LD 


A, (POSY) ;Get Y-position 


F039 


D381 


00041 




OUT 


(81H) ,A ;& set it 


F03B 


ED78 


00042 




IN 


A, (C) ;Get byte at screen loc 

Ltstlng 2 continued 
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Circle 534 on Reader Service card 



TRS 80 Computers 



All Tandy Computer Products Available 

Manufacturer's Warranty 



Model 1000 
Model 1200 HD 
Model 2000 



Model 4 
Model 100/200 
26-5111 Monitor 



New Tandy Printers Available 



Unbeatable Year End Clearance Prices] 



Visa — MasterCard — American Express 
Cashier's Check — Money Order 

Business Telephone Systems — Discount Prices- 
Install your own. Completely modular. 
Call lor Prices 

Computer Specialist available for assistance. 

TALLEY 
COMMUNICATIONS CO. 

P.O. Box 193 • 121 N. State St. 

Decatur, Texas 76234 • 817-627-2553 

Call for other computer, telephone and accessory prices! 

Fast Delivery References Available 



Circle 46 on Reader Service card 



Hypercross gets better and better! 

• TRS80 - CP/M - MS-DOS - CoCo File Transfer • 
Now you can CROSS the barrier between computers' Usirtg HYPERCROSS you can COPY 
hies between TRS-80 disks and those from many CP/M and IBM-PC type computers II you 
twe access to more than one kind ol computer, or you are changing to a new machine then 
you need HYPERCROSS lo transfer your text file*. BASIC FORTRAN PASCAL or C 
programs. Viscalc files, general ledger and accounting files, data bases and even binary files 
HYPERCROSS lets you format alien disks and copy files on your own TRS-80 or MAX-80 
without using cables 

Formats supported: IBM-PC and MS-DOS compatibles include DOS 1.1. 2.x '3.0 single and 
double sided and Tandy 2000 CP/M from Aardvark to Zorba. including all popular TRS80 
CP/M formats. 
PRICES mc disk manual. S/H We will match any advertised price 

Hypercross CoCo with TRS80-Color Computer NEW! .... $48.95 ppd 

Hypercross CP/M with 40 single sided formats $49.95 ppd 

Hypercross PC 'MS-DOS standard formats $49.95 ppd 

Hypercross XT/2.0 with 90 CP/M and PC formats .... Special 1 . . . $93.95 ppd 

Hypercross XT/iO-Ptus- Now with 200* formats mc CoCo $139.95 ppd 

Upgrade at any time for price difference plus $5 plus old disk 
Please specify TRS-80 Model I (needs doubter), m. 4/4P. or MAX-80 

HYPERZAP 3.21 Disk Magic! 
Do you want to back up your precious copy of Copycat 3. or SU Do you want to fix or modify a 
disk - if so then you need HYPERZAP1 On the market for 3 years HYPERZAP is more than just 
another disk copying program - it is the program for analyzing, copying, repairing, creating 
floppy disks of all kinds N works with TRS-80 formats as well as many others such as C P / M, 
PC. CoCo etc. Designed to handle mixed density sectors on any track in any sequence Many 
features for reading, writing, editing track and sector data Hyperzap is the tool that lets you 
be in charge Make your own sell booting disks. Take your own CMD file and turn it into a 
dual booting Mod 1 /III /IV disk Autopilot mode allows learns, saves and repeats procedures 
Disk cornea with fascinating examples. Use Hyperzap as a learning tool -find out how things 
are done" 
HYPERZAP for Model 1/3/4 or MAX-80 (specify) $49.95 ppd 

Arranger II Disk Index System 

World's finest disk cataloging system. Now you can find that file when you want it Arranger 
will CATALOG, SORT and FIND up to 11000 files fasti Runs on any Model I, III or IV and 
automatically recognizes any DOS even double sided. 
Arranger II - highly recommended $52.95 ppd 

New for 128K Model 4 users! 

TMDD The Memory Disk Drive Allows New DOS-80 users to use the extra 64K memory bank 
as an instant electronic disk drive Use it as your system drive' Works with Hypercross, no 
need for DOS in drive 0. 

TMDD The Memory Disk Drive for Model 4/4P with 128K #31.95 ppd 

ZIPLOAD - a real time saver) fed up with waiting for MODELA to load or setting up DOS and 
MEMDISK? Now ZIPLOAD lets you make yourself a super fast loading self booting disk for 
rapid loading of DOS. Memory disk and ROM image Example loads Model 3 DOS and ROM 
image in 1 4 sec after reset delay. Works with Model 3 and 4 DOS*. 
ZIPLOAD great for Model 4 and 4P S3 1.95 ppd 

HYPERSOFT 

PO Box 51155. Ratatgh. NC 27609 

(919)847-4779 8-11 pm EST 

Check. COD. Mastercard and Visa Accepted. 




Mail-Order c>ead04td Worldwide 

Electronics fi^tittifiQi* Slnce 1974 



Holiday 
SALE! 

FUNCTION 
PORTABLE 

" Size 11 2'Lx46"Wx 1.8'H • Weight. 2.2 lbs PRINTER 

Part No Description Price 

TTX Printer includes TTXpress Printer, Thermal Paper Roll, Paper Roll 
(Model 1280) Holder. 4 C-Size Alkaline Batteries, FREE Interface Cable 
(compatible with TRS-80 Model 1 00. Tandy Model 200 m 
and NEC-PC8201 A/8401 A) and Manual S99.95 

Accessory Includes Carrying Case. AC Adapter Battery Protector 

Kit 1280 one roil ol Thermal Paper S29.95 

Thermal Paper 1 00 Sheets of 8V x 11 Thermal Paper $ 5.95 



• TRS-80 MODEL 100 • NEC • OLIVETTI 



Easy to install module plugs right into the socket increasing memory in 8K 
increments. Three modules will increase your memory to its full capacity 
Complete with module and documentation for installation 

M1008K (TRS-80 Model 100 Expansion) $29.95 ea or 3/S79.95 

NEC8KR (NEC PC-8201A) S29.95 ea. or 3/S79.95 

OM108K (Olivetti M10) $29.95 ea. or 3/$79.95 



TANDY 200 



Easy to install module plugs right into the socket increasing memory in 24K 
increments Complete with module and documentation for installation. 
M200R (Tandy 200 Expansion) $99.95 ea. or 2/$1 89.95 



TRS-80 MODEL I AND III 



Each Kit comes complete with 8-MM5290 (UPD416/4116) 16K Dynamic 
RAMs and documentation for conversion. Model I: 16K equipped with 
Expansion Interface can be expanded to 48K with 2 Kits. Model III: Can be 
expanded from 16K to 48K using 2 Kits Each Kit will expand computer by 
16K increments 

TRS-16K3 200ns (Model III) $5.95 

TRS-16K4 250ns (Model I) $5.49 



UPDATE! TRS-80 MODEL IV, 4P UPDATE! 



Easy to install Kits come complete with TRS-64K-2 (8 each 4164N-20 
(200ns) 64K Dynamic RAMsi; TRS-64K-2PAL (8 each 4164s plus PAL chip) 
and documentation for conversion. 

TRS-64K-2 Expands Model IV from 16K-64K or 

Model IV 4 4P from 64K-128K (w/Mem. Disk) S9.95 

TRS-64K-2PAL Expands Model IV (w/Black & White Monitors only) 

from 64K-128K $29.95 



TRS-80 COLOR AND COLOR II 



Easy to install Kit comes complete with 8 each 4 1 64-20 (200ns) 64K Dynamic 
RAMs and documentation for conversion. Converts TRS-80 Color Computers 
with D. E, ET, F and NC circuit boards to 32K Also converts TRS-80 Color 
Computer II to 64K. Flex DOS or OS-9 required to utilize full 64K RAM on 
all computers. 
TRS-64K-2 $9.95 




MPI51S 
DDE-1FH 



MPI 5V4" Disk Drive 

TRS-80 Model I and III 

• Use as a second disk drive • Single-sided 

• Single/double density • Full height drive 

• 48 TPI • Documentation incl. • Wt.: 3.7 lbs 

(5v 4 Disk Drive) $69.95 each 

(5V 4 Disk Drive Enclosure) $69.95 each 



We also specialize in integrated circuits, custom cables, 

power supplies, keyboards, and much, much more! 

Give us a call today! 



S20 00 Minimum Order-US Funds Only CA Residents Add 6^ or 67% Seles Tax Spec Sheets 3 Oe ea 

Shipping-AddSV-. - $1.50 Insurance Prices Subfect to Change SendSASE tor Que/rert> Se/as Fryer' 

Send S1 00 Postage for your FREE J9B6 JAMECO CATALOG! 



MostorCora 



J 



Mad OiOei Electronic > WoiWrwde 



ameco 



ELECTRONICS 




1355 SHOREWAY ROAD, BELMONT. CA 94002 
12/85 Phone Orders Welcome (415) 592-8097 Telex: 176043 
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Give A Gift That 

Will Be Opened 

Every Month 



This Season, Give 80 Micro 



Why give a present that will be opened just 
once when you can give one that will be 
opened year-round? You'll be remembered 
this season, and every season, when you 
send the perfect gift for TRS-80* users— an 
80 Micro subscription. 

Month after month, 80 Micro will be a valu- 
able, practical, and sometimes surprising 
guidebook for the dedicated TRS-80 user. 
And for an incredibly low price, it offers more 
assistance and inspires more efficiency than 
most peripherals and software packages. Just 
look at the benefits: 

■ Shop-at-home convenience with concise 
new product information. 

■ Answers to both common and unusual 



computing problems in "Feedback 
Loop". 
■ Thorough evaluations and quality ratings 
of the latest Tandy-compatible products. 

Plus, a variety of type-and-run program list- 
ings, up-to-the-minute industry trends, and 
much more. 

All in the only system-specific source on the 
market for TRS-80 users. 

All for just $24.97—12 issues at 48% off 
the cover price. And you won't be billed until 
after the holidays. 

Send an All Seasons Greetings to someone 
special this season by returning the coupon, 
or by calling 1-800-258-5473. (In NH, dial 1- 
924-9471.) 



Y iSw! I Want To Give A Year-Round Gift 

Please send an 80 Micro gift subscription to the person listed 
below. I'll pay $24.97 for 12 issues— a 48% savings. 

[ : Payment Enclosed □ Bill me after the holidays! 

Please make checks payable to 80 Micro. 



Name of Gift Recipient 

Address 

City 



State 



• Zip 



My Name 
Address _ 
City 



State 



Zip 



Canada & Mewoo $27.97, 1 year orty, US funds drawn on US oar*. 

Fwegn Surface $44.97. 1 year only. US funds drawn on US bank. Foragn Mrmtf, please mqure. 

Al grt suDScrptJone w* begyi win tie first avalatte issue m 1966. 

' TRS80 e a registered trademark or Raoto Shack, a dr/son of Tandy CorporaOon 




Circle 137 on Reader Service card 



Listing 2 continued 












F03D 


DD7700 


00043 


LD 


(IX), A 


;Save it in buffer 




F040 


ED78 


00044 


IN 


A, (C) 


;get byte 2 




F042 


DD7701 


00045 


LD 


(IX+1),A 


;save it 




F045 


ED78 


00046 


IN 


A, (C) 


;get byte 3-8 




F047 


DD7702 


00047 


LD 


(IX+2) ,A 


;& store them 




F04A 


ED78 


00048 


IN 


A, (C) 






F04C 


DD7703 


00049 


LD 


(IX+3) ,A 






F04F 


ED78 


00050 


IN 


A, (C) 






F051 


DD7704 


00051 


LD 


(IX+4),A 






F054 


ED7 8 


00052 


IN 


A, (C) 






F056 


DD7705 


00053 


LD 


(IX+5) ,A 






F059 


ED78 


00054 


IN 


A, (C) 






F05B 


DD7706 


00055 


LD 


(IX+6) ,A 






F05E 


ED7 8 


00056 


IN 


A, (C) 


;Read 8th byte 




F060 


DD7707 


00057 


LD 


(IX+7) ,A 


;Save it 




F063 


0608 


00058 


LD 


B,8 


;B» # of bytes read 




F065 


1680 


00059 ROTATE 


LD 


D,128 


,- D is mask bit 




F067 


AF 


00060 


XOR 


A 


;Zero A 




F068 


DDCB0006 


00061 


RLC 


(IX) 


; Rotate byte 1 




F06C 


3001 


00062 


JR 


NC,$+3 


;Bit set? 




F06E 


B2 


00063 


OR 


D 


;If so set same bit on A 




F06F 


CB0A 


00064 


RRC 


D 


;D is now bit 6 




F071 


DDCB0106 


00065 


RLC 


(IX+1) 


; Rotate Byte 2 




F075 


3001 


00066 


JR 


NC.S+3 


;Is it set 




F077 


B2 


00067 


OR 


D 


;If so Set bit on A 




F078 


CB0A 


00068 


RRC 


D 


;Set bit 5 on D 




F07A 


DDCB0206 


00069 


RLC 


(IX+2) 






F07E 


3001 


00070 


JR 


NC,S+3 






F080 


B2 


00071 


OR 


D 






F081 


CB0A 


00072 


RRC 


D 






F083 


DDCB0306 


00073 


RLC 


(IX+3) 






F087 


3001 


00074 


JR 


NC,S+3 






F089 


B2 


00075 


OR 


D 






F08A 


CB0A 


00076 


RRC 


D 






F08C 


DDCB0406 


00077 


RLC 


(IX+4) 






F090 


3001 


00078 


JR 


NC,$+3 






F092 


B2 


00079 


OR 


D 






F093 


CB0A 


00080 


RRC 


D 






F095 


DDCB0S06 


00081 


RLC 


(IX+5) 






F099 


3001 


00082 


JR 


NC,$+3 






F09B 


B2 


00083 


OR 


D 






F09C 


CB0A 


00084 


RRC 


D 






F09E 


DDCB0606 


00085 


RLC 


(IX+6) 






F0A2 


3001 


00086 


JR 


NC,$+3 






F0A4 


B2 


00087 


OR 


D 






F0A5 


CB0A 


00088 


RRC 


D 






F0A7 


DDCB07 06 


00089 


RLC 


(IX+7) 






F0AB 


3001 


00090 


JR 


NC,$+3 






F0AD 


B2 


00091 


OR 


D 






F0AE 


77 


00092 


LD 


(HL),A ;A= 


New Byte, Store it 




F0AF 


CDD9F0 


00093 


CALL 


PRINTA j Print Byte 




F0B2 


10B1 


00094 


DJNZ 


ROTATE ;DO 


8 in all 




F0B4 


3A10F1 


00095 


LD 


A, (POSX) 


;Get x position 




F0B7 


3C 


00096 


INC 


A 


;Inc it 




F0B8 


3210F1 


00097 


LD 


(POSX) ,A 


;Save it 




F0BB 


CI 


00098 


POP 


BC 


;Get column count 




F0BC 


05 


00099 


DEC 


B 


.•Decrement 




F0BD 


AF 


00100 


XOR 


A 


;Zero A 




F0BE 


B8 


00101 


CP 


B 


;Done Last Column? 




F0BF 


C230F0 


00102 


JP 


NZ, MIDDLE 


;Go if not 




F0C2 


360A 


00103 


LD 


(HL) ,0AH 


;Print a Line feed 




F0C4 


CDD9F0 


00104 


CALL 


PRINTA 






F0C7 


3A11F1 


00105 


LD 


A, (POSY) 


;Get Y position 




F0CA 


C608 


00106 


ADD 


A, 8 


;Add 8 




F0CC 


3211F1 


00107 


LD 


(POSY) ,A 


;save it 




F0CF 


CI 


00108 


POP 


BC 


;Get count 




F0D0 


05 


00109 


DEC 


B 


.•Decrement count 




F0D1 


AF 


00110 


XOR 


A 


;A=0 




F0D2 


B8 


00111 


CP 


B 


;Check count 




F0D3 


C223F0 


00112 


JP 


NZ,OUT 


jCont. not zero 




F0D6 


C3F1F0 


00113 


JP 


BYE 


;Quit if Zero 








00114 ; Print Routine 






F0D9 


DBFB 


00115 PRINTA 


IN 


A, (251) 


;Get printer Status 




F0DB 


FE3D 


00116 


CP 


61 


;Is it ready? 




F0DD 


20FA 


00117 


JR 


NZ, PRINTA 


;If not wait 




F0DF 


7E 


00118 


LD 


A, (HL) 


;Get char in HL 




F0E0 


D3FB 


00119 


OUT 


(251) ,A 


;Send to Printer 




F0E2 


C9 


00120 


RET 




.•Return 








00121 ; 


-Put Printer in Graphics Mode 




F0E3 


E5 


00122 GRAMOD 


PUSH 


HL 


;Save HL 




F0E4 


2107F1 


00123 


LD 


HL.BGMODE 


;Get Printer Codes 




F0E7 


0604 


00124 


LD 


B,4 


; 4 bytes 




F0E9 


CDD9F0 


00125 GRA001 


CALL 


PRINTA 


j Print them 




F0EC 


23 


00126 


INC 


HL 


;Next byte 




F0ED 


10FA 


00127 


DJNZ 


GRA001 


; Repeat 




F0EF 


El 


00128 


POP 


HL 


;Get HL 




F0F0 


C9 


00129 


RET 




; Return 








00130 ; 


-End P 


rog ram/Ret urn 


Printer to Normal 




F0F1 


210BF1 


00131 BYE 


LD 


HL, BGMODE 


jGet Printer Codes 




F0F4 


0602 


00132 


LD 


B,2 


;2 bytes 




F0F6 


CDD9F0 


00133 BYE2 


CALL 


PRINTA 


; Print One 




F0F9 


23 


00134 


INC 


HL 


;Get next 




F0FA 


10FA 


00135 


DJNZ 


BYE2 


;Go print it 




F0FC 


3EFC 


00136 


LD 


A,0FCH ;No 


inc/dec, waits, board off 




F0FE 


D383 


00137 


OUT 


(STATUS) ,A 


;Set Graphics Options 




F100 


DDE1 


00138 


POP 


IX 


;Get regs 




F102 


CI 


00139 


POP 


BC 






F103 


Dl 


00140 


POP 


DE 






F104 


El 


00141 


POP 


HL 






F105 


AF 


00142 


XOR 


A 


;Zero A 




F106 


C9 


00143 


RET 




.•Return to Caller 














Listing 2 continued 



FOR TRS-80 MODELS 1, 3, 4, 4P 
IBM PC/XT, AT&T 6300, ETC. 

THE COMPLETE FORTH 

GETS A 
MAJOR UPDATE: 
MMSFORTH V2.4 

• A total software environment: custom 
drivers for printer, video and keyboard 
improve speed and flexibility (New TRS- 
80 M 4 version, too 1 ) 

• Common SYS format gives you a big 
395K (195K single-sided) per disk, plus a 
boot track! 

• Common wordset (79-Standard plus 
MMSFORTH extensions) on all sup- 
ported computers. 

• Common and powerful applications pro- 
grams available (most with MMSFORTH 
source code) so you can use them com- 
patibly (with the same data disks) across 
all supported computers 

• Very fast compile speeds and advanced 
program development environment 

• A fantastic full-screen Forth Editor 
Auto-Find (or -Replace) any word (for- 
ward or back), compare or Pairs-Edit 
any two ranges of blocks, much more. 

• Temporary dictionary areas 

• QUANs, VECTs, vectored I/O, and many 
more of the latest high-performance 
Forth constructs 

• Manual and demo programs are bigger 
and better than ever 1 

• Same thorough support Users Newslet- 
ter, User Groups worldwide, telephone 
tips Full consulting services 

• Personal Licensing (one person on one 
computer) is standard Corporate Site 
Licensing and Bulk Distribution Licens- 
ing available to professional users 




FORTH 



ITS BETTER THAN EVER. 

The total software environment for 
IBM PC/XT, TRS-80 Model 1, 3, 4 
and close friends 
• Personal License (required): 

M MSFORTH V2.4 System Dt»k $1 79.95 



l-flO Mod* ' *«qu« 



i'C«»» DOEN i 40-lrK* Of* i 



•Personal License (additional modules) 

FORTHCOM communications module . . $ 49.95 

UTILITIES 49.95 

GAMES 39.95 

EXPERT-2 open system . . 69.95 

OATAHANDLER 59.95 

DATAHANDLER-PLUS IPC only 128K req I 99.95 

FORTHWRITE word processor 99.95 

► Corporate Site License 



Extensions 
'Bulk Distribution 



Irom $1,000 

Iron) $500 50 units. 



• Some recommended Forth books 

STARTING FORTH (programming) 19.95 

THINKING FORTH (technique) 15.95 

BEGINNING FORTH [m MMSFORTH . 16.95 

S'upi ig. Handling & tax e»tra No returns on software 

Ask your dealer to show you the world of 
MMSFORTH. or request our free brochure 



MILLER MICROCOMPUTER SERVICES 

61 Lake Shore Road, Natick, MA 01760 

(617)653-6136 
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Circle 211 on Reader Service card. 




COMPUTER AIDED DRAWING pro- 
gram for the TRS-80 Model 4/4P with 
High Resolution Graphics Board. 

• Draw to any scale set by user. 

• Easy to see cross-hair cursor. 

• Draw Boxes, Lines. Circles. Arcs. 

• Paint automatic 26 different styles. 

• Paint with 8 brush sizes. 

• Type text in 4 directions. 

• Draw at any angle, specify length. 

• 8 line styles. 

• Use grid coordinates to move or draw. 

• Help menu. 

• Much more. 

Required equipment: 64K Model 4/4P with 
RADIO SHACK High Resolution Graphics 
Board and 2 drives. (Printer optional). 
Please include SASE with all inquiries. 

HIDRAW »49.95 

TO ORDER: Send check or money or- 
der. (PA. residents please add 6% 
sales tax.) Add $2.00 for postage and 
handling. 

T. Soft 

R.D. #5, Box 120 

Kittanning, PA 16201 

Radio Shack iod TRS30 «re ndmarki of Italy Corp 



The answers to the TRS-80 
trivia quiz (Sidetracks, p. 8): 



1. The Model I with Level 1 Basic: 
WHAT?. HOW?, and SORRY. 

2. Start up an Exatron Stringy- 
Floppy. 

3. RVEJARAJ. 

4. The sentence reads. "Joe, you 
rummy buzzard!" It was used in a 
prototype format program "s verifica- 
tion utility and got inserted at the end 
of each sector in the early TRSDOS 
1.3 disks. The format program was 
later changed to insert "(c) 1980 Ra- 
dio Shack." 

5. The Inventory Control program for 
Radio Shack stores, modified to feed 
itself nonsense data. 

6. International Jewelers Guild. 

7. TRSDOS 1.3. 

8. ULTRADOS. 

9. A$ and B$: 16 characters. 

10. It was a tape-based program that 
used Disk Basic verbs for mostly 
graphics-oriented functions. Its fea- 
tures included a timed Input state- 
ment, where you could set a time 
interval in which response had to oc- 
cur before the program took a branch 
elsewhere. 



Listing 2 continued 














00144 




-Data 






8083 




00145 


STATUS 


EQU 


83H 


F107 


IB 


00146 


BGMODE 


DEFB 


27 


F108 


4C 


00147 




DEFB 


•L' 


P1I9 


80 


00148 




DEFB 


128 


F10A 


02 


00149 




DEFB 


2 


F10B 


IB 


00150 


EGMODE 


DEFB 


27 


F10C 


4C 


00151 




DEFB 


•«' 


F10D 


IB 


00152 


NUMPIN 


DEFB 


27 


F10E 


41 


00153 




DEFB 


■A" 


F10F 


36 


00154 




DEFB 


8 


F110 


00 


00155 


POSX 


DEFB 





Fill 


00 


00156 


POSY 


DEFB 





0008 




00157 


SCRBUF 


DEFS 


8 


0002 




00158 
00159 


PRTBUF 


DEFS 


2 
ize Graphics Board-Routine found in Manual 










00160 


; Insert lines 


125-154 of the Initialization routine 






00161 


; page 


89-90 of 


the TRS-80 Computer Graphics Operation 






00162 


; Manual. Radi 


o Shack Catalog # 26-1125 


F000 




00190 




END 


GPRINT 

End 



1770 IF FF<>28 THEN 1790 ELSE POKE 120,135:GOSUB 1970 :PUT(Xl,Yl 
),CU,X0R :VIEW(0,0)-(639,239) :CLS :SCREEN1 :INPUT"READY PRINTER 

& PRESS 'ENTER' ";ZZ$ :G0SUB 1990 :IF PEEK (120) -135 THEN SYSTEM 
PR$ ELSE FI$-PR$ + CHR$(13) :G0SUB 2 

1790 IF FF<>29 THEN 1810 ELSE POKE 120, 135:GOSUB 1970 :VIEW(0,0) 
-(639,239) :CLS :SCREENl :INPUT"ENTER FILENAME";FI5 :GOSUB 1990 
:FI$«GSAVE "+FI5+ CHR$(13) :G0SUB 2 
1810 IF FFO30 THEN 1830 

1820 PUT(X1,Y1) ,CU,X0R :VIEW(0, 0) -(639,239) :CLS :GQSUB 1970 :SC 
REEN1 :PRINT :PRINT :INPuT"ENTER FILENAHE";FI$ :FI$»"GL0AD " +FI 
$+CHR$(13) :G0SUB 2 :ROl: GOSUB 2340 :RO0 :SCREEN0 :POKE120,13 
4 :GOTO180 

Figure. Change Rembrandt's lines to those listed above. 



aki ->,,,hV;-;,-,-A-, J 






It isn't easy to hide information like 
a serial number or surprise message in 
Basic program lines. Here's a quick 
and dirty way to give Model I/III Basic 
code a little privacy: it depends on a 
quirk in the Basic line editor. Follow 
these seven steps carefully: 

1 . Type in your line of Basic code as usual. 
Shorter lines work best: you must have some 
room at the end of the line. Press the enter key. 

2. Get into Basic's edit mode by typing in 
EDIT and the line number, then press the 
enter key. 

3. Press the "X" key to get to the end of the 
line. 

4. Extend the line by typing in a colon and 
REM (:REM) or a colon and an apostrophe (:'). 

5. Press and hold the shift key. At the same 
time, press the left -arrow key. Each time you 
press the left arrow, the cursor backspaces 
once without erasing the character under it. 
Backspace to the beginning of the message 
or code you want to hide. 

6. Now type in a new message. This will 
cover the original code. For example, you 
might want to cover GOTO 500 with PRINT 
AS. You can use spaces if you can't think of 
anything else. 

7. Press the enter key to lock in the new code. 
When you list the line, the display shows 



only the new information. Actually. Basic 
displays the original code and immediately 
covers it up: you should avoid long cover-ups 
as they might jitter on the screen. 

When would you use this technique? 
You might want to hide a serial num- 
ber contained in a program. If the orig- 
inal code were SN = 25. you could cover 
the 25 with 38. A user of the program 
would see the second number but Ba- 
sic would use the first. The Remark 
statement prevents any of the cover-up 
code from executing. 

You could cover a GOTO 500 with 
GOSUB 650— have fun following that 
program! Or you could hide a surprise 
message by covering :PRINT ""YOU 
LOSE. TURKEY" with :REM END OF 
GAME ROUTINE. Or try hiding some- 
thing like IF N$="ANDY" THEN 
CMC'S", where N$ Is the name of a 
friend. Your friend will be puzzled be- 
cause the program will list properly but 
will always seem to reboot — on him or 
her only. 

Andy Levlnson 
Studio City. CA 
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TIDBIT #30 



Trying to read a long file as it 
whizzes by your screen is a study in 
frustration. To properly inspect file 
lines, you need a program that writes 
files to your screen in small, controlla- 
ble pieces. Page, a Model 4 Assembly- 
language program, displays files either 
a screenful at a time or line by line. 

Type in the code in Basic, run it. and 
it will write the file Page/CMD to disk. 
To use Page, type in PAGE FILE NAME 
at TRSDOS Ready. Page lists a screen- 
ful of the indicated file's code and 
pauses for a response. Pressing the 
spacebar writes the next screenful of 
code, and pressing the enter key writes 
the file's next line. 

If you press the break key or control- 
C. you exit the program. Of course. 
Page also stops at the end of the file. 
Since I designed this program for stan- 
dard text files only, you must save Ba- 
sic programs in ASCII format, using 
the SAVE FILE NAME. A option. 

Dan Velting 
Kentwood. Ml 

Editor's note. We have published the 
accompanying listing in Basic data 
statements. The Basic program and 
/CMDjlle are available on Load 80. 



Program Listing. Page. 

10 OPEN "0",1, "PAGE/CMD" 

20 FOR II - 1 TO 652 

30 READ Xt 

40 PRINT #1, CHRS(X%) ; 

50 NEXT 1% 

60 CLOSE 1 

70 END 

100 DATA 1,2,0,48,0,205,119,84,212,141,84,220,157,84,205,119/84,195,141 

110 DATA 84,205,157,84,14,6,205,119,84,212,141,84,220,157,84,201,33,16 8,84 

120 DATA 9,78,35,70,35,94,66,106,241,201,205,65,73,205,115,58,205,232,57 

130 DATA 254,34,40,4,254,39,32,110,71,205,219,57,205,219,57,42,160,105,43 

140 DATA 43,229,184,14,0,40,11,12,205,219,57,254,13,40,9,184,32,245,205 

150 DATA 164,57,184,40,23 9,205,232,57,205,115,58,254,44,40,9,254,59,40,5 

160 DATA 184,40,2,254,13,225,34,160,105,32,50,121,2 54,2,56,45,205,214,57 

170 DATA 71,205,219,57,205,219,57,24,23,85,115,97,103,101,58,32,112,97,103 

180 DATA 101,32,102,105,108,101,13,0,40,8,205,164,57,254,44,40,135,201,205 

190 DATA 161,68,24,129,205,229,61,245,58,60,106,183,250,1,71,241,205,37,69 

200 DATA 121,254,44,202,4,85,201,205,67,78,245,120,230,131,196,159,51,241,201 

210 DATA 205,65,73,205,115,58,254,34,40,5,254,39,196,114,51,79,175,245,205 

220 DATA 219,57,254,13,202,1,71,185,32,6,205,164,57,185,32,10,71,241,197 

230 DATA 183,196,161,68,241,24,22 8,193,245,120,135,120,40,1,2,0,49,5,246 

240 DATA 128,205,161,68,241,254,44,40,197,201,205,65,73,205,34,86,205,225,84 

250 DATA 121,254,44,32,9,213,205,229,61,67,209,195,3,86,58,231,10 8,183,40 

260 DATA 22,6,0,122,179,200,27,42,44,106,35,34,44,106,58,70,105,183,196 

270 DATA 45,74,24,236,42,44,106,25,5 8,43,106,71,195,52,84,205,153,85,58 

280 DATA 70,105,183,192,58,107,106,254,85,192,60,50,107,106,201,205,6 5,73,205 

290 DATA 225,84,205,67,78,205,24,70,121,254,44,40,239,201,58,77,105,61,250 

300 DATA 110,86,71,50,77,105,58,78,105,61,184,32,3,50,78,105,58,78,105 

310 DATA 144,159,60,50,130,105,205,153,86,50,79,105,195,242,57,205,119,51,201 

320 DATA 58,79,17,81,48,6,0,126,254,13,202,179,49,254,32,202,179,49,18 

330 DATA 35,19,4,195,161,49,62,13,18,120,254,0,194,194,49,62,1,183,195 

341 DATA 197,49,62,0,183,194,80,50,33,81,48,17,105,4 8,62,78,239,33,156 

350 DATA 48,6,0,62,59,239,202,226,49,79,203,241,62,26,23 9,33,0,48,17 

360 DATA 105,48,6,80,62,3,239,194,0,50,230,127,119,35,254,13,202,251,49 

370 DATA 16,239,54,0,62,0,183,1,126,0,50,194,101,50,33,0,4 8,78,121 

380 DATA 6,0,184,202,21,50,62,2,23 9,35,202,6,50,5 8,137,48,61,50,137 

390 DATA 48,58,137,48,6,0,184,204,40,50,195,226,49,62,1,23 9,254,32,202 

400 DATA 66,50,254,13,202,72,50,254,128,202,106,50,254,3,202,106,50,195,40 

410 DATA 50,62,23,50,137,48,201,58,137,48,60,50,137,4 8,201,33,13 8,48,78 

420 DATA 121,6,0,184,202,98,50,62,2,239,35,202,83,50,195,121,50,254,28 

430 DATA 194,115,50,17,105,48,62,60,239,202,121,50,7 9,203,2 41,62,26,23 9,6 2 

440 DATA 22,239,2,2,156,49 



Circle 36 on Reader Service card. 



COPYCAT 4.1 

NOT COPY PROTECTED— NOT COPY PROTECTED 



COPYCAT 4.1 will allow you to duplicate virtually all of your TRS-80 diskettes even 

if it is protected. COPYCAT 4.1 will automatically analyze, format, copy and verify 

each track of the diskette you are copying. The entire process is typically less 

than 70 seconds for a single sided 40 track disk. 

COPYCAT 4.1 can easily be configured for single or double sided diskettes, number 

of tracks to copy, which drives to use, step rate and to double step 80 track drives. 

COPYCAT 4.1 is available now for $49.95. Terms of payment are Visa, MasterCard, 

Check, Money Order or C.O.D. Please include $2.00 for Shipping and Handling. 

California residents please add 6% sales tax. All orders are normally shipped within 

24 hours via first class mail. 

COPYCAT 4.1 $49.95 

OMNISOFT RESEARCH 
2170 W. BROADWAY, #501 
ANAHEIM, CA 92804 
(714)772-5000 
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PROJECT 80 / by Roger C. Alford 



Making TRS-80 Assemblers 
Toe the Hex/ASCII Line 



When you build a hardware project , 
your software has to work with it. 
But the output from TRS-80 assemblers, 
such as EDTASM and ALDS. doesn't con- 
form to the industry-standard Intel hex- 
adecimal/ASCII absolute object code 
format, which lets you easily load and 
transfer microprocessor object files. 

Since I use the hex/ASCII format for 
much of my development debugging 
equipment, I wrote a program that con- 
verts TRS-80 object files to hex/ASCII. I 
can download such files to my emulator 
(such as the Huntsville Microsystems Z80 
emulator in the Photo) and Sunrise Elec- 
tronics EPROM programmer. The DR800 
single-board computer in the April (p. 82) 
and May (p. 78) columns also accepts code 
in the hex/ASCII format. 

I can also easily send them over tele- 
phone lines using a modem. Hex/ ASCII 
has several advantages. First, it includes 
object location (addressing) information 
so the system must know where in mem- 
ory to put the code. Second, it includes a 
data integrity check (checksum) so you 
can transfer data reliably to another sys- 
tem. Finally, it uses only printable ASCII 
characters and a carriage return at the 
end of each line, avoiding special control 
characters that the receiving system 
might not understand. 

TRS-80 Absolute Object 
Pile Format 

Before describing the Intel hex/ASCII 
format. I'll discuss the TRS-80 absolute 
object file format. This is essential to un- 
derstanding my conversion program. 

I have experience with the formats 
produced by Radio Shack's EDTASM ed- 
itor/assembler (running under NEW- 
DOS/80) and with Radio Shack's Assem- 
bly Language Development System 
(ALDS). which 1 use on my Model 4R In 




System Requirements 

Models I and HI with changes 

Model 4 

Disk Basic 



■ 


■MBn^B^B^BBB^n^nvM^LV 


1 


SINGLE BOARD EMULATOR m 










HUNTSVILLE 
MICROSYSTEMS 





Photo. The Huntsville Microsystems Z80 emulator. 



general, EDTASM and ALDS generate 
the same format for an executable object 
file, but ALDS' format is slightly differ- 
ent under certain conditions. 

Figure 1 shows the general format for 
Radio Shack's absolute object files. The 
first byte is a record header and is always 
a 1 (01 hex) as long as the file has at least 
1 byte of code. The second byte is a 
count value, indicating the number of 
data bytes in the record plus the number 
of address bytes (there are always 2 ad- 
dress bytes). The next 2 bytes indicate 



the starting memory address for the ob- 
ject bytes in the current record; the low- 
order byte is first, followed by the high- 
order byte. The address bytes are then 
followed by the specified number of data 
(object code) bytes, which are to be 
placed into memory. All values are in bi- 
nary, not ASCII. 

As many of these 1 hex type records 
follow as is necessary to hold all of the 
object code bytes. Once all of the bytes 
have been included in these records, the 
assembler puts a terminator at the end 



Header 


Record 


Record itartlng 


Record itartlng 


Record data 


byte 


byte court 


addreaa (low) 


addresa(high) 


(nn - 2 bytei) 


Record 1 01 


nn 


si 


sh 




XX ... XX 


01 


nn 


si 


sh 




XX ... XX 


Record n 01 


nn 


si 


sh 




XX ... XX 


Terminator 02 
Record 


02 


1 sl 


sh 


1 








1 










Program starting 










execution tddresi 






Figure 1. TRS-80 absolute object file format. 


(All values 


are 


in hex.) 
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Disks 



More Memory for your Money 

Lowest Prices Ever On Diskettes 

Certified 100% error free 

9.2 mil diskette jacket 

Covered by a Lifetime Warranty 

Manufactured with Reinforced hubs 

Supplied with white Tyvek sleeves 

Supplied with user ID labels 

Meet or exceed all industry standards: ANSI ECMA IBM ISO 

Digital Disk brand diskettes. Special Value Savings On . . . 

Digital Disks diskettes are for use on these famous brand computers such as IBM PC. XT. A T Comaq, A T& T. 
Zenith, Tandy, Cannon PC. Atari. Commodore. Corona, Columbia. Eagle. Tava. 

5-1/4 Soft-Sectored, 

Single Sided/Double density floppy disks 

Bulk quantity shipment of 

20 items $.79 each SO Items $.76 each 100 items $.73 each 



SS/DD 



DS/DD 



5-1/4 Soft-Sectored, 

Double Sided/Double density floppy disks 

Bulk quantity shipment of 

20 items $.89 each 50 items $.86 each 



100 items $.83 each 



Special Offer Packaging on Our Digital Disks Name Brand Diskettes 

Digital Disks Ten Plus Pac $12.95 Double sided 

10 diskettes in an attractive plastic library case $11.95 Single sided 



Digital Disks Fifty Plus Pac 

50 diskettes in an attractive plastic library case 



$50.00 
$45.00 



Double sided 
Single sided 



'We sell the same diskette 
that major software 
publishers, computer 
manufacturers and diskette 
marketers buy calling them 
their own Why pay more 
when you can pay less. ' 

How to order: 
Call Toll Free 
1-800-336- DISK 
312-789-0645 

Terms: 

Prepaid checks, money 

orders. 

VISA. MasterCard or 
approved company purchase 
orders are accepted No 
surcharge for the use of 
VISA or MasterCard Due to 
our low low prices and 
assurance that all 
merchandise is new, unused 
product, all sales are final. 



Shipping: 

Add S3 00 per each 100 or 

fewer diskettes. 
Illinois residents add 6.5% 

sales tax 
Hours: 

Monday thru Friday 
8:00-500 Central Time 



Digital Disks 

10 East 22nd Street 
Lombard, Illinois 60148 



HARD DISK FOR TANDY" 1000 

Now Add An Internal Hard Disk Drive To Your 
Tandy 1000 And Keep Both Floppy Disk Drives In 
Your Computer. 

*^Wtt* 10 MEGABYTE 
HARD DISK 




Statewide 



The UpGrade Experts 




20 MEGABYTE 
HARD DISK 

UNIQUE FEATURES OF THE HARD DISK KIT 



*699 
*899 



VERY EASY TO INSTALL 

SYSTEM BOOTS FROM THE HARD DISK 

RUNS LOTUS, D BASE AND TANDY 1000 SOFTWARE 

INTERNAL MOUNTING HARD DISK ALLOWS FOR EASY INSTALLATION OF HIGH 

CAPACITY DATA STORAGE 

NO NEED TO ELIMINATE THE SECOND FLOPPY DRIVE FOR HARD DISK OPERATION 

LOW POWER CONSUMPTION. NO ADDITIONAL POWER SOURCE REQUIRED 

FULL ONE YEAR WARRANTY ON COMPLETE UNIT 



How lo order 
Call Toll Free 1-800-802-8314 
312-455- 2264 

Shipping: 

Free shipping UPS ground In U.S 

lllinou residents add 6.5% 

sales tax 

Hours: 

Monday 'h-u Friday 

8 00-5 00 Central lime 



Term*: 

Prepaid checks, money orders 

VISA Mas'erCard or approved 
company purchase orders ore 
accepted No surcharge tor the 
use of VISA or MasterCord 




Ten East 22nd Street 
Lombard. Illinois 60148 
CALL 1-800-882-8311 
312-655-2266 
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of the file. The first byte of the termina- 
tor record, the record header, is always 
a 2 (02 hex), as is the second byte (the 
record byte count). The final 2 bytes of 
the record, bytes 3 and 4. arc the exe- 
cution starting address of the program, 
which can be (and often is) different from 
the starting address where the object 
code is loaded into memory. Again, the 
address bytes are in low-byte/high-byte 
order. 

ALDS modifies this format slightly if 
you assemble your program absolutely 
(by specifying the starting address as an 
operand to the PSECT pseudo-op and 
avoiding program-linking): it adds one 
record at the beginning of the file. The 
record's format is shown in Fig. 2. This 
is not clearly indicated in the ALDS man- 
ual. The record header is a 5 (05 hex) 
byte. This is followed by a record byte 
count byte, which is followed by the 
specified number of data bytes. The pro- 
gram's starting address is. however, in- 



cluded in this record (bytes 4 and 5). 
though it seems redundant, since it is 
also in the initial data record. You can 
discard this extra record without losing 
any information. 

A sample Z80 Assembly -language pro- 
gram in Program Listing 1 (from ALDS) 
is written like an interrupt service rou- 
tine. It saves the CPU registers by swap- 
ping register banks, causes a time delay 
by counting down a value in the HL reg- 
ister pair, and then restores the registers 
and enables interrupts before exiting via 
a Return instruction. 

This sample program is 14 bytes long, 
and specifies the label DELAY as the ex- 
ecution starting location. If you assem- 
ble and link the file starling at address 
7000 hex. the label DELAY is assigned 
the value 7002 hex and the absolute ob- 
ject file generated by ALDS looks like 
that shown in Fig. 3. Note that it is a bi- 
nary file and all values are given 
in hex. 





Record 


Record information 


Header byte 


byte count 


(nn bytes) 


05 


nn 


XX ... XX 


Figure 2. ALDS assembler object file record addition for absolutely assembled 


programs. (All values are in hex — base 16.) 





The Intel Hex/ ASCII Format 

While the TRS-80 format is adequate 
for many uses, it isn't flexible enough for 
general -purpose object files. In particu- 
lar, it lacks a checksum and a way to 
easily transfer files. While an internal 
system checksum verifies the object in- 
formation as it loads from the disk, there 
isn't one for transferring files. 

When you transfer the object file from 
one computer to another over an RS-232C 
serial line, the receiving system probably 
tries to interpret some of the bytes being 
received, since many of them are defined 
as ASCII control characters. 

To avoid this problem, the hex/ ASCII 
format contains only printable ASCII 
characters (except for the carriage re- 
turn at the end of lines, as mentioned 
earlier). 

As in the TRS-80 object file format, the 
hex/ASCII format has two basic record 
types: data records and a terminator rec- 
ord. Figure 4 shows the formats for the 
hex/ASCII data and terminator records. 
Note that all characters and object infor- 
mation are now ASCII characters, not bi- 
nary values shown in hex. Each byte of 
information in the data record is actually 
stored as 2 hex/ ASCII bytes in memory, 
in the hex range of zero to 9 and A to F. 
For example, the bytes 38 90 BA 2C 
would be stored in memory (or on disk) 



Tandy Corp. ALDS ALASM copr. 1982,83 v. 03. 02. 00 Page 1 
Assembly Listing of HEXASCII/SRC: 1 



08/27/85 



E Addr 
0000 



Obj 



0000' 


D9 


0001' 


08 


0002' 


213412 


0005' 


2B 


0006' 


7C 


0007' 


B5 


0008' 


20PB 


000A 1 


08 


000B' 


D9 


000C 1 


FB 


000D' 


C9 



!002' 



No Assembly Errors 

Time - 0:01 
Bytes ■ 14 
Lines - 27 



00001 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
00011 
00012 
00013 
00014 
00015 
00016 
00017 
00018 
00019 
00020 
00021 
00022 
00023 
00024 
00025 
00026 
00027 
00028 
00029 



Source Line 

EXAMPL PSECT 

J LAST MODIFICATION DATE: 08/25/85 

; 



; FILE: HEXASCII/SRC 

I 

I AUTHOR: Roger C. Alford 

; MODULE DESCRIPTION: 

I This program is merely an example program for the Project 80 

I discussion of Intel Hex/ASCII object code format. 



EXAMPL 



DELAY 
LOOP 



EXX 
EX 

LD 

DEC 

LD 

OR 

JR 

EX 

EXX 

EI 

RET 
; END OF SERVICE ROUTINE: 
t 



AF,AF* 

HL,1234H 

HL 

A,H 

L 

NZ , LOOP 

AF,AF' 



END 



DELAY 



;SWAP THE MAIN CPU REGISTERS 
;SWAP AF TO SAVE IT TEMPORARILY 
;L0AD THE DELAY COUNT VALUE INTO HL 
; DECREMENT THE DELAY LOOP COUNT VALUE 
fIS THE COUNT VALUE ZERO YET? 

;IF NOT, LOOP AGAIN 
; RESTORE REGISTERS A AND F 
;REGISTER THE MAIN CPU REGISTERS 
; ENABLE Z80 MASKABLE INTERRUPTS 
j RETURN FROM THIS SERVICE ROUTINE 
EXAMPL. 

; START EXECUTION AT LOCATION 'DELAY' 



Program Listing 1. Sample Z80 Assembly-language program. 
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as 33H 38H 39H 30H 42H 4 1 H 32H 43H. 

Notice how 2 bytes are stored in mem- 
ory for each information byte in the hex/ 
ASCII data record. This is the hex/ ASCII 
format's main disadvantage: It isn't very 
memory efficient. 

The first character in every hex/ ASCII 
record is the colon (:): it has a value of 3A 
hex and is the start -of-record indicator 
character. The first byte (two ASCII char- 



acters) following the colon indicates the 
number of data bytes in the record (all 
values are in hex). The next 2 bytes in- 
dicate the starting memory address for 
the data bytes in that record (high byte 
first). The fourth byte is the record type 
indicator, which is always 00 for a data 
record and 01 for a terminator record. 

The object data for the record, if any. 
follows the record type indicator byte. 



Record 1 

Record 2 

Record 3 
(terminator) 

Figure 3. ALDS 
hex — base 16.) 


Header Record 
byte byte count 

\m\ [03] 

Header Record 
byte byte count 

[oD |oS 

2B 7C 
Header Record 
byte byte count 

[02] [02] 
object file output for 


Starting code 
address for record Data 


Data 




|00 70||D9| 

Starting code 
address for record 




|01 70| 


08 
FB 


21 34 12 
08 D9 FB 




B5 20 
Program starting 
execution address 

I 


|02 70 




Listing 1 program. 


All values are in 





Number of 

data bytes in 

record 



Record starting 
address (high/low) 



Record type 
indicator 



Data bytes 

(nn bytes) 




Start of 
record indicator 



Program starting 
execution address 



Checksum byte 



Figure 4. Intel hex/ASCII record formats. (All characters are ASCII. Spaces be- 
tween record bytes are shown only for clarity and do not exist in the actual 
records.) 



:01700000D9B6 

:0D700 1 00082 1 34 1 22B7CB520FB08D9FBC9F7 

:007002018D 

Figure 5. Hex/ASCII object file printout for program in Program Listing 1. 



TRS-80 filespec 


entered 


Conversion program interpretation 


TESTFILE 




TESTFILE/CMD:0 


TESTFILE/ 




TESTFILE:0 


PROJCT80/: 1 




PROJCT80: 1 


PROJCT80:2 




PROJCT80/CMD:2 


MICRO80/ABS 




MICRO80/ABS:0 


MICRO80/ABS: 1 




MICRO80/ABS: 1 


Figure 6. Interpretation of entered 


object file filespecs for hex/ASCII conversion 


program. 







Terminator records have no data bytes, 
but data records should always have at 
least 1 data byte. A checksum byte fol- 
lows the data bytes. When all of the 
bytes in the record arc added together, 
including the checksum byte (ignoring 
any carries above 8 bits), the result is 00. 
The checksum totals include only the 
hex values displayed, not the ASCII nu- 
meric values. For example, a data record 
containing :0 100040023 (all characters 
are ASCII) would have the checksum D8. 
since 1 + 00 + 04 + 00 + 23 + D8 = 00 
(carry ignored). 

The resulting final data record is 
:0100040023D8 (again, with all charac- 
ters in ASCII). 

The terminator record always has a 00 
length specification, as mentioned 
above, since the terminator record in- 
cludes no data bytes. The address value 
included in the terminator record speci- 
fies the execution starting address for 
the program. 

With the conversion program, you can 
generate the hex/ ASCII object file for the 
example program in Listing 1 with a 
printout (Fig. 5). 

One final note about the hex/ ASCII for- 
mat. Systems reading in or receiving ob- 
ject information from a hex/ ASCII file are 
supposed to look for the start -of-record 
character (colon). All characters before 
the first colon are to be ignored. Thus you 
can store information in the hex/ ASCII ob- 
ject file before the data records. You can 
use this feature to store the symbol table 
for the program (with only ASCII char- 
acters and no colons, of course), which 
lets you load the symbol table with the 
object file for symbolic debugging. 

The Conversion Program 

The conversion program (Program 
Listing 2) is in Model 4 Basic. It will run 
under Model I/III Basics if you change 
the long variable names to one- or two- 
character names and change the INSTR 
functions in lines 40. 100. and 160 to 
subroutine calls. You can do this by us- 
ing the assignment SVS = ":" or SV$ = "/" 
(whichever is appropriate) and calling 
the subroutine in Program Listing 3. For 
example, line 40 would become 

40 SVS = '*: "GOSUB 8000:DRVPOS = SV. 

You might also need to change line 
10030. which returns you to DOS. de- 
pending on what DOS you're using. 

Lines 5-12 are the comment header 
and startup message for the program. 
Lines 13-14 dimension and initialize the 
HEXVAL$ array, which holds the 16 hex/ 
ASCII characters in numerical order. 

Lines 20-340 acquire the filespec for 
the TRS-80 object file and determine the 
filespec of the output hex/ ASCII file. You 
can enter the TRS-80 object filespec in 



80 Micro, December 1985 • 87 



PROJECT 80 



one of several ways. If you don't include 
an extension, the default is /CMD. If you 
include the file name with a "I" suffix, 
without any extension characters, the 
program will assume that the file name 
has no extension. Or you can give the file 
an extension of your choice. The drive is 
zero unless you specify otherwise. Fig- 
ure 6 shows several possible filespecs. 
along with the actual filespec interpre- 
tation by the conversion program. 

The hex/ASCII output file has the 
same filespec as the input file, except 
that it gets a /HEX extension. You're 
prompted for the drive number for the 
hex/ASCII file: press the enter key for the 
default drive (the same number as the 
input file) which is in parentheses, or en- 
ter the desired drive number. 

Lines 400-550 initialize the variables 
and open the files. The variable TOTAL* 
BYTECOUNT is the accumulator to 
count the total number of data (object 
code) bytes in the file. OBJFILES is the 
input file and HEXFILES is the output 
file. The input file is a random-access file 
with a record length of one. whereas the 
output file is a sequential file. OBJ- 
DATA$ stores the input records. 

Lines 560-1340 do most of the file pro- 
cessing. Lines 592-598 cause the extra 
ALDS record (with the 05 hex header 
byte) to be ignored, if present. The pro- 
gram converts the remaining object data 
to hex/ ASCII format and writes it to the 
output file. Lines 2000-2280 generate 
the terminator record, close the files, 
and exit through line 10030. which is 
currently a return to DOS. 

The program displays the number of 
object code bytes, along with the pro- 
gram's starting execution address. 

Lines 3000-3040 add the decimal 
value in DECNUM to the running check- 
sum accumulator. CHKSUM. 

The subroutine at lines 4000-4100 
converts the decimal (base 10) value in 
DECNUM to a hex/ASCII character in 
HEXNUMS. using the HEXVALS array. 

The subroutine at lines 5000- 5060 in- 
crements the address variables ADDRL 
and ADDRH. which keep track of the 
current object byte address for the hex/ 
ASCII file. The subroutine at lines 
6000-6100 calculates the checksum 
byte for the current hex/ASCII record 
and writes it to the output file. 

The subroutine at lines 9000-9020 re- 
trieves the next byte from the input file, 
and updates the input file record pointer. 
OBJPTR%. Lines 10000-10020 gener- 
ate a data read error message and close 
the files if a data error is detected. ■ 



Write to Roger C. Alford at P.O. Box 
2014. Ann Arbor. MI 48106. Please en- 
close a self -addressed, stamped enve- 
lope for a reply. 



Program Listing 2. Model 4 hex/ASCII conversion program. 

5 ■ •••••••••••••••••••••*••*•.....*•.....*....*****. *•***••*••••*••••***« 

6 ' THIS PROGRAM CONVERTS ALDS ABSOLUTE OBJECT FILES TO INTEL HEX/ASCII * 

7 ' FORMAT. THE OUTPUT FILENAME IS THE SAME AS THE INPUT FILENAME, BUT • 

8 ' HAS THE EXTENSION "/HEX". * 

9 ' +++ CREATED BY Roger C. Alford 08/04/85 +++ • 
la ........................................•**......................•.... 

11 CLStPRINT "TRS-80 BINARY TO INTEL HEX/ASCII FORMAT CONVERSION PROGRAM" 

12 PRINT " by Roger C. Alford Version 1.2 88/25/85":PRINT 

13 DIM HEXVALS ( 16 ): FOR I»«0 TO 15:READ HEXVALS(I») :NEXT 1% 

14 DATA "0","1","2","3","4","5","6","7","8","9","A","B","C","D","E","F" 

20 INPUT "ENTER OBJECT FILENAME (/CMD) ";0BJFILES 

30 IF LEN(OBJFILES)-0 THEN 20 

40 DRVPOS-INSTR(0BJFILES,":") 

60 IF DRVPOS-0 THEN OBJDRIVES-" : 0" iGOTO 100 ELSE OBJDRIVES-MIDS (0BJFILES,DRVPOS, 

2) 

80 0BJFILES-LEFTS(0BJFILES,DRVP0S-1) 

100 EXTPOS-INSTR(OBJFILES,"/") 

120 IF EXTPOS-0 THEN OBJFILES-OBJFILES+'/CMD" :G0T0 160 

140 IF EXTPOS-LEN(OBJFILES) THEN OBJFILES-LEFTS (OBJFILES, EXTPOS-1 ) 

160 EXTPOS-INSTR(OBJFILES,V") 

180 IF EXTPOSO0 THEN HEXFILES-LEFTS (OBJFILES, EXTPOS-1 ) ELSE HEXFILES-OBJFILES 

200 HEXFILES«HEXFILES+"/HEX" 

220 OBJFILES-OBJFILES+OBJDRIVES 

240 PROMPTS" "ENTER DRIVE NUMBER TO STORE HEX FILE ( "+RIGHT$(0BJDRIVES,1 ) +" ) " 

260 PRINT PROMPTS; 

280 INPUT HEXDRIVES 

300 IF LEN (HEXDRIVES) -0 THEN HEXDRIVES-0BJDRIVES:G0TO 340 

320 IF LEN(HEXDRIVES)-1 THEN HEXDRIVES-" : "+HEXDRIVES ELSE GOTO 260 

340 HEXFILES-HEXFILES+HEXDRIVES 

40 TOTALBYTECOUNT-0 

500 OPEN "R",1,0BJFILES,1 

520 FIELD 1,1 AS OBJDATAS 

540 0BJPTR%-1 

550 OPEN "0", 2, HEXFILES 

560 GOSUB 9000 

570 OBJRECTYPE-ASC (OBJDATAS) 

580 IF 0BJRECTYPEO1 AND 0BJRECTYPEO2 AND 0BJRECTYPEO5 THEN 10000 

585 GOSUB 9000 

5 90 OBJRECLEN-ASC (OBJDATAS) -2 

592 IF 0BJRECTYPEO5 THEN 600 

594 FOR I»-l TO OBJRECLEN+2 

596 GOSUB 9000:NEXT II 

598 GOTO 560 

600 GOSUB 9000 

620 ADDRL- ASC (OBJDATAS) 

640 GOSUB 9000 

660 ADDRH- ASC (OBJDATAS) 

680 IF OBJRECTYPE-2 THEN 2000 

1000 TOTALBYTECOUNT-TOTALBYTECOUNT+OBJRECLEN 

1010 IF OBJRECLEN>- 16 THEN DATACNT-16 ELSE DATACNT-OBJRECLEN 

1020 PRINT »2,":"; 

1040 CHKSUM-0 

1060 DECNUM-DATACNT:GOSUB 3000:GOSUB 4000 

1080 PRINT #2, HEXNUMS; 

1100 DECNUM-ADDRH:GOSUB 3000:GOSUB 4000 

1120 PRINT #2, HEXNUMS; 

1140 DECNUM- ADDRL :G0SUB 3000:GOSUB 4000 

1160 PRINT *2, HEXNUMS; 

1180 PRINT 12, "00"; 

1200 FOR 1-1 TO DATACNT 

1220 GOSUB 9000:OBJRECLEN«OBJRECLEN-1 

1240 DECNUM-ASC (OBJDATAS ): GOSUB 3000-.GOSUB 4000 

1260 PRINT t 2, HEXNUMS; 

1280 GOSUB 5000 

1300 NEXT I 

1320 GOSUB 6000 

1340 IF OBJRECLENO0 THEN 1010 ELSE 560 

2000 PRINT ♦2,":00"; 

2020 CHKSUM-0 

2040 DECmUM- ADDRH: GOSUB 3000:GOSUB 4000 

2060 ADDRH S-HEXNUMS 

2080 PRINT »2, HEXNUMS; 

2100 DECNUM- ADDRL: GOSUB 3 000: GOSUB 4000 

2120 ADDRLS-HEXNUMS 

2140 PRINT »2, HEXNUMS; 

2160 PRINT 12, "01"; 

2170 DECNUM-1: GOSUB 3000 

2180 GOSUB 6000 

2200 CLOSE 

2220 PRINT:PRINT "THE TOTAL NUMBER OF PROGRAM BYTES IS: "/TOTALBYTECOUNT 

2240 PRINT "THE EXECUTION STARTING ADDRESS IS: "; 

2260 PRINT ADDRH S;ADDR. S; " (HEX)":PRINT 

2280 GOTO 10030 

30BB <........................*.**......................................... 

3010 ' THIS SUBROUTINE ADDS THE "DECNUM" VALUE TO "CHKSUM" 
3020 CHKSUM-CHKSUM+DECNUM 
3040 RETURN 

40e e -....*.*....*..••....*••*.***•*.•«•.................................. 

4010 ' CONVERT DECNUM (BASE 10) TO HEXNUMS (BASE 16) 

4020 IF DECNUM>255 THEN PRINT ■*•*•• DECNUM ERROR •*•**• :CLOSE:GOTO 10030 

4040 LONYBBLE-DECNUM AND 15 

4060 H I NYBBLE- (DECNUM AND 240) /16 

40 80 HEXNUMS-HEXVALS ( HINYBBLE) +HEXVALS ( LONYBBLE) 

4100 RETURN 

Listing 2 continued 
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Ustlng 2 c 

5B88 


ontlnued 




5918 


' UPDATE "ADDRL* AND 'ADDRH* ADDRESS COUNTERS 


5B20 


ADDRL- ADDRL+1 


5(41 


IF ADDRL-256 THEN ADDRL-i : ADDRH- ADDRH+1 


5068 


RETURN 


6080 




6111 


' CALCULATE LINE CHECKSUM AND WRITE TO HEX FILE 


6021 


CHKSUH-CHKSUM AND 255 


6040 


IF CHKSUM>=0 THEN DECNUH-0 ELSE DECNUM»256-CHKSUM 


606 


GOSUB 4000 


6080 


PRINT I2,HEXNUH$ 


6100 


RETURN 


9000 


i»»»«***t*****»*****t«»*»******************<«*«tt****************«**« 


9005 


• GET NEXT RECORD (BYTE) FROM OBJECT FILE 


9010 


GET l,OBJPTR%tOBJPTR%-OBJPTR%+l 


9020 


RETURN 


10000 


IMMtM*MMMMtHtH*HHMHt*HUMMHtttMtnMMHM*HHtM 


10005 


' COME HERE FOR DATA READ ERRORS 


10011 


PRINT:PRINT ****** DATA READ ERROR ****** 


10020 


CLOSE 


10030 


SYSTEM 


10040 


END 




End 



Program Listing 3. Subroutine for Model 1/IH Basics. 
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8010 • THIS SUBROUTINE SIMULATES THE "INSTR" FUNCTION 

8020 SV-0 

8030 FOR It-LEN(OBJFILE$) TO 1 STEP -1 

8040 IF MID$(0BJFILE$,I%,1)-SV$ THEN SV-I% 

8050 NEXT It 

8060 RETURN 



End 




ACCTS RECEIVABLE SI 50 00 

5000 ACCTS. & 15000 TRANS. 

BALANCE FORWARO 99 TRANSACT COOES 
3O-6O-9O120 AGED STATEMENTS SHOW 
DATE / INV • / DESCRIP / AMT / & AGEING 
SELECTIVE FINANCE CHARGES & RATES 
FAST ENTRY POSTING W/AUDIT REPORT 
SUB - ACCTS. % CRE Dl T L I M IT D AT E O F L AST 
PAYMENT LABELS AND MORE ADD $50 00 
FOR INVOICING MODULE. OTHER OPTIONS 
AVAILABLE - CALL. 

ACCTS PAYABLE $50.00 
DERIVED FROM OUR A/R -WRITES CHECKS 

GENERAL LEDGER $1 50.00 
400+ACCTS. 5000+TRANS/MONTH 
• BEST LOOKING FINANCIAL STATEMENTS 

- DEPARTMENTAL P»L (UP TO 9) + ■* 

- STATEMENT OF CHANGES 

- SUB-TOTALS WHERE YOU WANT 

- FAST FLEXIBLE POSTING INPUT 



OIMO^OR ABOVE $20 00 EACH +S&H 

WITH MANUEL DISK. SAMPLE OATA 



COMBINATION SPECIALS 

• 1A/R4G/LFOR ... $20000 

«2 A/R A/P S G/L FOR $225 00 

SUPER P/R PAYROLL - THE BEST $200.00 



M.D.P. 

2366 Lincoln. Oroville CA 95966 

916/533 5992 

MON-FRI BAM TO 2 PM 

ADD 3 00 S4H TO ALL ORDERS ADD3.00IFCOD 
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You have a large technical au- 
dience thai ...sfieakSL English 
and is in need' of the kind of 
microcomputer information 
that CW Communications/Pe- 
terborough provides. 
Provide your audience with the 
magazines they need and 
make money at the same time. 

For details on selling 80 Micro, inGder 
HOT Mo, AmigaMrkl, and /^contact 

SANDRA JOSEPH WORLD WIDE MEDIA 
386 PARK AVE. SOUTH 
NEW YORK, N.Y. 10016 

tHorepij) mm t&ex««w» 



¥>u're inGoodCompany 

WhenMxi Program 

inBetterBASIC 







i Sfc 




BetterBASIC features include 640K, STRUCTURED, MODI I.AK. INTERACTIVE. 

EXTENSIBLE and COMPILED Prices BetlerlSASIC SW>. si is' Math Module >w 

Runtime Swem: S2S0: Sample I >i>k >1<i 

Summit Software Technology Inc l-K(M>-22S-SS(H) 

P.O. Box W. Kahson Park. Welle>le\. \l\ nJl~ 

In Canada -tl<> -jW-SJh 
*l.isim .r>! ITS* rn Cfcedi 

KrtlrrKAMi Is .i RKDIHtd lraikmark 
iitMiminil N>tm.irr Ft-iliiM il"Vi%. Inc 
IBM K .in J IBM PC XT HE IC0HBHI 
ir.t«Jcuiarkv <>l liiiiTii:«i«piial KuMiie» 




Machines Uirp lai J - 1 ■ 
trademark <if Tan J- ' n II 
4t»Ar .irt rrviNitrrol tradene 
Miming companies VW«i 
\l \ ! General Ekcuu i u 
I •■ in.- Mi-iirK" ' •■rr- THS I 



ALSO AVAILABLE FOR THE TANDY 1000. 1200 AM) H 
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SAVE A BUNDLE 



WITH ONE OF 
OUR BUNDLES 



We have put together special bundles ot software just in time to save you a bundle of money. Didn't you ever wonder why CP/M was so 
popular^ The reason is the software availability. All programs (except EP) are for the Model 4/4 P and have been optimized to install and run 
without hassle For example, we have memory-mapped WordStar* and it runs circles around the standard version available elsewhere We 
also added printer drivers for the Daisywheel II and the DMP-21 00 Our CP/M' 2.2 is the best around. Read the reviews You know the 
programs. You know the prices. This is the years' best value You owe it to yourself to let these CP/M* programs and thousands of others 
(many in the public domain) start serving your needs. 




Save A Bundle on these books and disks 

Take advantage of our volume discounts. Buy any three items from this list and deduct $5 from 
your total order Buy four deduct $10 Buy five ..deduct $15 Buy six., deduct $?0 and so on 
Buy a bunch, save a bundle Please add $1 each for shipping. Add $5 to orders under $50 for 
handling. 




' 1984 by Montezuma Mcru WordStar* SpettStar" Star index " ManMerge' DalaStat'" Heoo^St* " and CaeStar" belong to 
MicroPro' International Corporation LP M' betongs lo Digital Research Inc dBASfc II' belongs lo Ashion tale Im. All ihe Pencils' 
belong In Michael Stayer Turbo Pascal' belongs lo Borland lileinatonal 




TRS-80 Disk A Other Mysteries. Ihe How to book ol data 
recovery tor the TRS-80 Model I disk operating system 128 pages Retail 
Retail $22 50 Now $18 

Microsoft BASIC Decoded & Other Mysteries. The com- 
plete guide to Level II and BASIC 312pages 
Retail $29 95 Now $24 

The Custom TRS-80 A Other Mysteries. The complete guide 

to customizing TRS-80 Hardware and Software 336 pages 

Retail $29 95 Now $24 

BASIC Faster A Better & Other Mysteries. The complete 
guide to BASIC programming tricks and techniques 290 pages 
Retail $29 95 Now $24 

BASIC Faster A Better Library Disk. Contains 121 functions 
subroutines and user routines Search merge compare and listing routines 
plus array handlers. BASIC overlays and video drivers 
Retail $19 95 Now $16 

BASIC Faster A Better Demonstration Disk. Contains 32 
demos ot the Library D>sk contents above 

Retail $1995 Now $24 

BASIC Disk I/O Faster A Better A Other Mysteries. 
Programming tips and techniques to store 'etneve data trom disk. 432 
pages Ratal $29 95 Now $24 

BASIC Disk I/O Faster A Better Demonstration Disk. All 
ot the mapr demo programs and library ol disk I subroutines in 25 BASIC 
programs Random Indexed Sequential and TREESAM file handlers 
included Retail $2995 Now $24 

Machine Language Disk I/O A Other Mysteries. A guide to 
machine language disk I tor the TRS-80 288 pages 
Retail $29 95 Now $24 

TRSDOS 2.3 Decoded A Other Mysteries. Detailed expiana 

tion of the Mode 1 I disk operating system 298 pages 

Reta.i $29 95 Now $24 

How To Do It On The TRS-80. A complete applications guide to 
the T RS-80 Model I II III 100. and Color Computet 352 pages 
Retan $29 95 Now $24 

The Custom Apple A Other Mysteries. Who cares 7 
Retail $2995 Now $19 

Due to the nature ot mis business there ate NO REFUNDS on software We KCtpl 
American t «oress MasterCard Visa and C 00 *aur card is Tot charged until we snip your oidei 
Personal and company cnecks are accepted without »iay z»t tor *t*isi Delivered pices *e 
lor the lower rightmost 18 Stales amy Prices and specrdcatons subject lo cfianoe w*hout notice 
i' you don 1 understand any * tfus us' grve i is a call and we wil 1 lane the lime to enplam it unti 1 
/ou do First timers are always welcome here 

ORDER NOW . . . TOLL FREE 



NIONTEZUNUL WM27-0347 
N*k.ICSO = "SWT! 800-442-1310 



P14-339 5104 ■ 

Redhird Airport Hangar *ft 

P0 Box 320? 1 

Dallas lexas /V3.' "WE KEEP YOU RUNNING' 



Th» To* Fr»» hnw* »■• lor orders onry 
Specification* mopci lo enanga without note* 
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NtOHTEZUNUt 
MICRO 



P.O. Box 2169 

Camp Verde (Lizard Flats) 

Arizona 86322 

' ' WE KEEP YOU RUNNING ' 



COMPUTERS 



C.ITOH 



26 'Co 

26 VI' 
26 J' 34 
76 31 36 
a isos- 
•b 1*50 
26 H'O 

?(. mij 

26 I860 
26-5103 
26 5'04 
26 602' 
26 6022 
26 6050 
?f. sow r 



I S4K 



. ,>.- 7 



t 4K F. 'ended BAS'C COKr' Co 

6* ColO' Computer 2 

6H E vended BASIC Coior Computer 2 
Pockei Computer 3 v'" <•* "'V 
Pocket Compute' 4 

PtX't' Scenl,f« lo» pule. 5 

Mode 100 24K PoiatHe Compute' 

Mode 200 24* Potable Compute' 

Mode 2000 2 or .e I28« 

Mode 2000 * «a'o Disk and 256« 

Mode' 6OO0 2(1> 5t2k 

Model 6000 HO S' 2k. 

Or l Iiinira 



2124 
3»24 

4674 



100' 



Gx 100 Gonna Banana Semi or Pa'ai* 50cps 

P'oW'iitv J' lOScps NlO Ftict.'T'ac Pa'a"* 1 

3520 350cos Paratktl iBM Compal.bie 

85'OBPi i20cpsF-,c'K>n T-actor Parallel iBMComp 

8510SEP Hoi Dot tSOcps stlO IBM Graphics 

6510CEP ' Colors ISOcos IBM Graphics 

I550P downier 2 t20cp* tor Wide F*ape' "Vaiie 

I5508CD Same as above e.cept sena' interlace 

I5S0SCR ' colors itOcps Real Fast * W'de 

I550SEP- iBMG'apf'cs 'BOcps NLO 

• 10 40 starwrter aocps Oa'Sywneei 

• 10 55 Mnwr 58cps Oa'Sywneei fast 

• to B" Drrect'ona' Tractor win Piashc Cow 

• 10 Electric Single Bin Sheet Feeder Ins' Ragurfed 
• ' Mecnan.cai Single Bin Sheet Feeder 
24LQ 24ptn Dot Matn. 200cps ' Colors 3600P 



w. - 



MODEMS 



.- if • 



25 1003 Moot '000 300 Baud Interna' 

25 1 0t 3 Mode. ' 000 300 ' 200 Baud me 

26 1084 Moo* 4P Modem Board 
26 1 1 '3 DC Modem it 

26 I "4 Acoustic Coup*' Mode" 
26 ' i '6 DC 22' 2 300 ' 200 Baud 
26 " " DCM 5 300 Ba^o Moden- 
26 1 1 re DCM 3 300 Baud Modem 
Anchor Mat. I Modem 300 BauO w tr 
Ancno- 300, '200 Baud Modem *"• Ci 
Hayes Smadmooem 300 Baud 
Ha.es I200B TOO 1200 Baud mte-na 
"ayes Smarimodem 300 '200 BauO 
Hayes Compawve 300 '200 uses sa- 



« ptintet to keep '' ' 

CABLES 



H^ • 



We -"anuiaclu'e a great iumoe* o' <J 
to connect most anytfiing TO anything f 

(.■•». needs We p»ot>abi» "a/e .t on 



SUPPLIES 



PERIPHERALS 



5 25 SSDD Diskettes Pack o" I yea. Guarantee 
5 25 DSOO Os«enes Path ol 10 ' Yea- Gua'ax'ee ' 
8 SSDD DisKeties Pac» o' '0 ' Yea' Gua'amee 
8 DSOO Diskettes Pack ot to ' vea' Guarantee 
5 25 fi.pson hokjs 'SD'SkS 
8 5 « 1 ' T'actot Pape* 20ID 2900 Stieets 
14 ill T'aclot Pape' 2WD 2900 Sf«ets 
5 25 ot 8 Head Cieantng Kit 



ALSO ill A00 ON CARDS UNOtB UPGRADES 
iNWtO 2* ao.net - "a" •"or * «es 

12" Green Nor (ii4.w OcenpQSrM V'Oeo Mo"''o. 
12" AmtMt No" G'a'e Cc"posi1e V'dwo Mo" to- 
12" CVeen w date Tl nBMi v,oeo Mon.ic 
12" AmtMf No- Gia-e III HBMl »<1eo Mon.tO' 

TTi Moniots ^ome •* IBM Caole at No C"a'ge 
v.d-o tacae tot Model ' keyooa'd to mon-tot 

25 3010 Model '200 VM 3 Monocntcne Monto- 

26 051 1 Ge«oi"e HI Pa->ty«ise Ant. G'a'e (VvKe 
26 '085 Model 4P Ca"yng Case 

26 " 33 Model 3 1 5MB Ha-o D'Sk mst •.■< 

26 ' '34 Model 4 15MB ila'd D.s« mst k.i 

26 I '63 Model '00 Ba' Code Read*- 

26 "85 Coio. Compute' Koaia Pad 

26 '19' Mouse 'ot Mode' '000. '200 2000 

26 i '98 Se.'a' 'o Pa'aie. Convene- 

26 '208 CCR 8' Cas 

26 '209 CCR 82Cai 

26 '244 PoAe* St"p Line I 'te- 

26 ' 326 Anti Giate Panei Mode' 2 

26 1342 Ciea' keytoyer 'or Model 3. 

26 '410 Moo* '00 Modem Car** 

26 '429 Automatf Po*et jl"p Su'ge P'otetto' 

26 '45' Non AulotnaK Povet S'tip.^.tlet 

26 t45: Ant' Gla'e Panel Model 1 3.4 

26 2226 CMO' Compute' Dei u ,e BS 232 k" 

26 3008 Color Compute' Joysticks Per Pa- 

26 3012 Color Computer Deiuie joystick eacr- 

26 3024 emeu Computer Muii. Pak interlace 

26 3025 Color Computer Mouse 

26 3'29 Coki' Computer Ha'«H»g* D.sk D* »e 

26 3'30 Lolor Computer Ha'tM.on Add or Dr. re 



■ lape Reco'de' 



2 16 



26 32" 
26 3212 
26 3503 
26 3508 
26 3608 
26 36'2 
26 365' 
26 3653 
26 !654 
26 3804 
26 3805 
26 1809 
26 38' I 
26 38'2 
26 ' 



Mode. '000 VM 2 Monochrome ' 
Mode' '000 '200 CM 2 Co.0' Mc 
PC l Cassette Interlace 
PC I La"yng Case 
PC2Ca"yngCase 



PC 2 RS 232C 

PC 4 Cassette interlace 

PC a m Ram Module 

PC4la-,.n,rase 

Mooei 100 AC Adapt*- 

Mode' 100 AcouiK Coupi 

Mode' 100 Ca-..ng Case 

Mode' 100 Son C. 

Mode' '00 Le<,s I 
i Mode' '2 '6B ("temai 15MP nard o.s 
S Model 2 1 4 12 '6 15Mb P..ma., h,. 
12/16 15Mb Secondary t 



9C« 



FURNITURE 



26 ' 324 Computer 1 

26 ' 354 Computer Stand 

26 1 355 Pr.nter Stand 

26 >3S6Sysler-o«s, 

26 '35' P'.nier Sland 

26 '358 Corner 'o' ' 356 5 ' Des. Sian 

26 1349 Hunt, tor I 356 Des. 

26 >360P"nier Pia'torm 

26 4303 Deruie System Des* 

26 4305 Oe'uie P-^ite' Sla"d 

26 4306 le'm.nai Stand 

26 430- Pr.nter Stand 

26 4 ' 1 4 Mode' 2000 Peoesia 



PRINTERS & ACCESSORIES 



26 ''92 
26 "96 
26 1255 
26 '261 
.'6 '268 
26 '269 
26 '270 
26 '2'i 
26 12 '4 
26 12'5 
26 1 2. '6 
26 I2T7 
26 12'8 
26 12'9 
26 '280 
26 144 1 
26 144) 



26 '408 
26 '409 
26 440' 
26 1490 
26 '49' 
26 ' 492 
26 '493 
26 1495 
26 '496 
26 '498 

.-- '499 
Ityou 
26 1=9 ' 
-'6 3605 
:s inl.-' 



G'apnic 
GT "6Grapn'CS Pad 
DMP '20 I20cps Dua' Mode P"r.ter 

IP lOTne'maiMalr . Pr.nter 

CGP 220 Color ink Jet Printer 

PTC 64 64k Pr.nter Controller .Butter. 

OWP 5i0 43cpsDasyy.neei pr.nter 

DMP 1 10 50cps 1-ipie Mode P-.nte' 

DMP 2 'OOP I60cps D.,a' Mode Prnte 

TRP lOOPr n.er 

DMP i05C".eeepP"nie' 
DMP 430 Not So Cneeep Pinter 
DAP 220 Replacement 'or dwp 210 
DMP 2200 H.gn Speed Matni Pinte- 
DMP '30 lOOcps ir.pie Mode P'.nte 
Bi D"ect,onai Tractor tor OMP 2100 
B.- Directional Tractor tor DWP 2'0 
B.-D"ect'onai T'actor 'or DWP 220 
B' Directional Tractor lor Daisyy.nee' i 
S-ngie Bm Sn«' Teede' '0' .':...■.'.- 
Acoustic Coyer 

B Di'eci.onai T.actor lot DVyP-4'0 

Model ' 3 4 4P Printer CaDW 

RS 232C Cade 

Modei 100 P' nte' Cap* 

Mode' 2 '2 16 2000 P'n.er faD* 

10 RS 232C Cable 

25 RS 232C do* 

50 RS 232C Capie 

100 RS 2321 Cab'e 

RS232CCab,ef.tendei 

RS 232C Nun Modem Adapte- 

sw 302 Pa«ai'e Pr nter Smt^i 

its ? pos'ton &ul oniy 

S* 303 RS 232C Selector S*'tcf 

rs 2 DOS't'On but Only 
Pi 3 P' -te' 
P-- 1 p- . ■,.• 



RIBBONS 

nave m<xe »iOOo< s ma*- you do Wa» too ^ary -ypes t< 
f Aaa the"- to your o*0«' iow T ne Y *e oeeeeo loo 

■IIIIIIIIUUIIIIII 

MONTEZUMA'S REVENGE 

MODEL 3 UPGRADE 

11 2K CP/M • 80 COLUMN 

Thu month Monta offari the deal of lha yaar. Tha 
Holmas VI D AO ta tha only plug m printed circuit board 
which aapandi tha Mod 3 display to 24 lines ol SO char 
■ ciers and allows operition of tha CP/M 2.2 oparating 
■yatam orrth a S6K T PA Both 80 a 24 and «4 i 1 6 modas 
ara available from TR5DOS and BASIC Reads and 
whtaa 11 diffarani diak formats (Kaypro, Oiboma. ate). 
A total of 112K of RAM. Tha extra 46K RAM can ba aat 
up at a RAM disK through softwara routmai that ara 
fumiahad with the supplied CP/M operating system 
Tha VID-BO cornea complete with »ny to follow instal- 
lation mslructiona and operational documentalion No 
trace Cuts or soldering required. Guaranteed for one 
yaar parti and labor. Monty can ship this today. 

MONTE't SPECIAL PRICE $ 279 

Add WordStar 3 3 complete and ready to run lor ( 100 
WE KEEP yOU RUNNING 

Miiimiimiiiiiai 

SOFTWARE 



CP M 2 2 Dy Montejurna Mcro For Tne Model 4 

Rated oast Dy actual lest Go' Hie good on* 
NCWI CP.M Hard D-sh D".e' entr Dacfcup ft Resto 
HfWI 25 3' 30 MS DOS 1 BASIC D'S" Doc Mode' 
26-0310 TRSDOS 2 3 For The Moo* 1 
260312 TRSDOS 1 3 For Tne Mode' 3 
26 0316 TRSDOS 6 2 Ut.i'ty D'Sk 
26 0316 TRSDOS 6 2 Dsi • Doc ■ Re' Cad 
26 0413 Disk Drive Analy/or Why pay rnce ' 
26 '50? Model '.3 Siockpa- 
26 1510 Modei i 3T.enoe. 
26 1511 Model 3 Home Accountant 
26 1512 Modal 4 Target PlannorCaic 
26 '513 Modal '3 Cass Spectacu'aloi 
26 '514 Modal 3 PortToi<o Manage' 
26 151 5 pis "a 'or Mode' 3 
26 '516 p's report 'or Modei 3 
26 151 t p's repon 'or Mooei 4 
26 1518 p's We tor Mode' 4 
76 1520 Moo* 4 VisCaic 
26 162' Modal 3 VisiCaic Business Forecast 
26 152 T Mode) 3 4 Formation 
26 1530 Mooai 4 MuiupJan 
26 '538 Model 4 Apanmem Management 
26 1 539 Mooei 3 4 W-2 Wnler 
26 1540 Model 3.4 Cuanera. ladge- 
26 1541 Model 3 4 Accounts Rece..ap« 
76 1542 Mode' 3 4 Accounts PayaM 
26 1543 Modal 3 4 Payroll 
26 1544 Modal 3,4 m.oca VV>.te> 
26 '545 Model 34 In.entory Cont'd' 
26 1559 Mode' 1.3 Manufacturing Inventory Control 
26 1 560 Modal 1 3 >i«eo Assets 
26 1 562 Mode 
26 1 563 Mode' 
26 15*4 Modei 
76 1 565 Mode' 
26 ' 568 Mode < 3 Medical i 
76 ' 569 Mode' 3 vs'Caic E 
5^7 Modal > '3 Survey- 



3 Prolne 
3 SCRIPS! I 
3 Ma'kj'am 
3 Micro"'* 



26 5'9» 



3 Per; 



.•'4^- 



.onnei Manage' 
26 '582 Mode' I 3 T.me Ma-age' 
26 '564Modei3Cneci.<."'e'80 
26 '585 Mode' 3 Business Cnecxmie 
26 ' 588 Mode' 1 3 Videoter Pius 
26 ' 589 Modei 3 MICRO Cou'*' 
26 1590 Mode" 3 Suoe'SCRIPSiT 
26 '691 Mode' I 3 Scran* Dictionary 
26 '592 Modei 3 Protie Pius 
26 '593 Mode' 3 Prot.ie Plus iDOS Ml 
26 ' 594 Modal 3 Desktop, P'an 80 
26 1695 Supe'SCPiPSIT 'or Tne Mod 
26 '596 SCRIPS T Fo. Tne Mode 4 
26 '59' Mode 3 Business Grapn.cs P. 
26 '598 Mode' 4 v.deote. P'_s 
26 '600 0'C!>ona'y 'or tne Model 4 
26 ' 606 M€W Mode' 4 DeSk^a'e 
26 '630 Tk' Soi.et 'or 'ne Mooei 4 
26 '635 Mode 4 Pro'ne 
26 '922 Mode 3 4 Orcnosfa 90 
26 20i ' Mode ' 3 i DA_S 'ape ve's.o 
26 20' 2 1-4 Assemp, Language De.r 



26 2015 Modei 3 msfuct'On Tapes 

26 201 ' Model 3 Assemrjiy l angoage Cou'se Tape 

26 2016 Model 3 Assemoiy Language Course Ds- 

26 2019 TRSDOS 6 . Tiammg Cou'se 

76 7072 Power Toe tor the Mode' 1 3 

26 2023 Do' Plot 'or «ne Model ' 3 

26 2025 Const' uclkx 'or "re Mode' 4 

26 2026 New COBC. Oue'y lor me Mode' 4 ' 

26 202' Giapnics 90 lor sometn.nu 

26 2'90Modei4COBOl 1 

26 2200 Mode 3 FORTRAN 

26 220' Mode ' FORTRAN 

26 2203 Mode 1 3 COBOL 1 

76 2205 M<ro PILOT 

76 7710 Mode' 3 BASCOM t 

26 2211 Modal 3 Aicor PASCAL 2 

26 2212 Aicor pascal f . ine Mode 4 2 

26 2713 Model 1 LDOS II SI ve'von. 

26-2214 Model 3 LDOSILSI -e-sion} 

26 22 16 CP.M Pius I or Tne Moon 4 t 

26 GOOD T >w Good CP M lo- tne Model 4,Mo..lejuma i 

26-RFAL GOOD Hard D'Sk Dr ve- tor MM CP M 

26-FVFNBf TTfR Monte s W.ndov. tor MM CP M 

26-FAR OUT Mome s tootkl tor MM CP M 

26 WOW Monte s BAS CON TRSDOS BASIC to P V 

26 221 ' CBASiC Fc Tne Mode' a .Reduces CP M 

26 7? 1 8 BASCOM •<* me Mode' 4 i 

26 2219IORIHAN lor trie Model 4 

26 2220 23 V oeotei vanous applications 

26 2224 Compuse'v Do* Jones S-gn up K'l 

26 2230 Modai 4 c Language 2 

26 2231 Model 4 DouOie Duty i ' 28k 'eg i 

76 7"BModai3PIIOT 1 

26 2721 Conjr Computoi LOGO Disk 

26 2'22 Ccnot Computer LOGO ROM Pa.» 

26 3030 OS 9 For Tne color Computer 

26 3034 HEWI OS 9 PASCAL tor ma CO'O' Computer 

26 3036 SC 9 BASC 'or tne Coior Compute' 

26 3038 HCVfl C Comp.ie' lor me Color Compute' 

26 3821 Model '00 Learning l at 

26 3829 Model '00 Multiplar ROM 1 

26 3830 Modal 100 Scnpsii Cassette 

ALL Color Compstlar GAMES 25*. OFF Catalog Price 
ALL »>C(VDS) SOFTWARE 30*. OFF Catalog Puce 
26-4501 General ledge' I 
26 4502 inventory Management System I 
26 4503 Payrok J 



• Order In 
26 4515 Pro'* II Plus 
26 4516 P-Olae T-B'n.ng Gu'de 
26 451 ' P'oLle Plus upgrade 
26 4520 Time Accounting 
26 4531 SCRIPSiT 2 
26-453? SCRIPSIT ut-iiry Ois- 
26 4534 SCRIPSIT O'Clonary 
26 4536 SC RiPS. T Pione' D- ,f 
26 4545 Litigation Suppon 
26 4550 Business Grapnirs Ana'ys-s P»> 
26 4554 Accounts Rece'.aDie 
26 4555 Menu Generator 
26-4556 P'o'*e Forms 
26 4557 Profile Arcn„e 
26-4558 PrOl'ie PrOSOrl 

26 4559 Proiook 

26 4560WfSHAIV 

26 4580 MulKPian Modei 2 12 

26 4601 General Ledger 

26 4602 Inventory Control Syste" 

26-4604 Accounts Recei.apie 

26 460' Orde- Entry ICS 

26 4608 Sales Ana'ys s 

26 4621 Pr.-s. "..■ '--.• 

26 4701 lORTRAN 

26 4'02EDAS 

76-4703 COBOL 

26 4705 Compiler BASIC 

26 4 707 COBOL General"- 

26 47'0 Program EdrtO' 

26-471? Assembly Language De.etopmer.! bys'e" 

26-4"3EDASt 

26 4'2l Vdeota. For Tne Mode- 2 '2 16 

26 4'25 BASCOM UASIl Compile- 

26 4742 CBASIC 

26-4802 inventory tor the Hard DiS- 

Hard D'Sk 

26 4835 SCRIPSIT lor Thmime D- ves 

ALL MEW MODEL 2000 GOOOIES 
26 52' Genera' Ledge' 
26-52' 7 Accounts PayaD'rr 
26 62' 3 Accounts Receivable 
26 52' 4 inventory Control System 
76 5760 VTieote. Pius 
26 5300 lotus I 2 3 
26 5306 p's 'epo" 
26 53' ' Mutipan 
76 5330 Muliiale 
76 5340 Home Accountant 

MODEL 1? ft It 68000 SOFTWARE 
26 6I00COBOI Development System 
26 620) Genera' Ledger 
26 6203 Payroll 
26 6205 Accounts Pavao'e 
26 6209 Jot. Costing 
26 6302 inventory 
26 6450 MAC16 Mai "j assembler 



V.i'.i 



ron- 






26 6455 COBOI V XENIX 

26 646/MBASlC lor XENIX 

Electric Pancrl 2 Mode ' 3 

Electric Pencil in. M.oe 2000 

Blue Pencil Modei 1 3 

Red Pane* Modal I 3 

Pencil T.p Punter Enhance' 

Modem 80 A PovreCu Commun,ca''Ons Progran- Ml 

Tracacaaa to- ma Mode' 3 The o'.gina. copy p'og<a- 

Super utjkty Plu. 3.2 Runs on Modai 13.4 

Super Uturty Piu» 'or Mode' 4 and 4P omy 

"ansler uM.ty Ru-s uhde' MM ( 
Vans'erS txiin ways belwee- a", 

c-nalicm ol TRSDOS 13 6. PC MS DOS l ■ 2 . 3 . 

84 CP M var.al.ons Mui n taster ma- s.,pe'CRO". > 

H'PER 

CROSS. XT mciudes Mo-te S 'OO'DO. 

Supe-CROSS XT Spec ly Mode' l 3 or 4 

CONV3T04 Conveir Moo I 3 BASIC 'o Mod 4 

CONV3TOPC Modi 3 BASIC to MS DOS !,, EMS 

■ASCOH Cimvans Mod 4 BAS'C 'o CP M MBAml 

TURBO PASCAL Spe, •, L.P M or M!. DOS Verse 1 

TURBO PASCAL Fo- MS DOS a-d 606" 

TURBO PASCAL lor MS DOS *■" 808' 4-d BCD 

TURBO TUTOO Get staled - ghl D.s. ft -a' .a 



CP/M OPERATING SYSTEMS 



FDAS 



Mode 



CFMI5 lo' me Mode' 4 Tin VERY BES 


ONF 


Ou' Very Own T', C k Hard D'Sk Q. ver 








P t T CO* 2 2m I opo, ve'so- Mode 2 


'2 r| 


PtTCPM 2 ?m to' RS Mar I D.s. Mode 


2 t? 



BOOKS and MANUALS 

25 1501 MS DOS Re'eience Manual S 

25 '50? MS DOS BAS'C Re'e'e-ce Ma-'uj 

25 '503 Mode '000 Programmers Manua' 

25 '504 Mode' '000 Techno Re'e'ence Ma-ua 

25 1505 Complete Gu-de 'o the Mooei '000 

25 '506 introduction to MS DOS 

26 '3'8 Newesf Sourcebook volume ' 
26 2'02 Modei i Lave' u Man„a' 

26 2i'i Mode' ) DOS Manual 

26 2" 2 Model .1 BASIC mst'uCW Ma-ua' 

26 2H4 Sourcebook voume6 

26-21 15 Newsiene- Book 1980 

26 21 '9 Mode' 4.4P TacHlW* Ma-u4 

26 2240 Newsiene- B«» '96' 

26 2241 Newsiene- Book '98? 

26 3191 Color Compute- »»'„ a 

26 3192 E.lended Coior Compute- Ma-ua 

26 319' Sto E»l BAS'C Ma-uai to- Coior Computer 

26 3810 Mode 100 'ach-icai Manual 

26 38'9 Mode '00 Boo. -, ...-• . 

26 492' Mode' 2 Tecnr.^a Re'e'e* ce V.i- ..a 

26 4922 Mode. '2 Ooetitmq Manua' 

26 5403 Mode 2000 P'og-a—W' s Ma-ua. 

26 5404 Modei 2000 Ha'dwa-e Manua 

26 6041 Mode' I6B Ope-atng Ma-ua' 

THS-80 D'Sk & Omer Myste'*s i. - - 

Mk:-osort BASIC Decodadi. ..-- 

BASIC Faster ft Bene''. ..- i- - --v 

BASIC Faster ft Belter Demoristravo" D>s. 

BASIC Faster ft Fitter i 'twa-y D-Sk 

BAS'C Disk i O'asle' & Ben*' •, ... ,» «••.» 

BASIC Disk 10 L'brary D'Sk 

The Custom TRS 80 i.i- -• - ' 

TRSOOS2 3Decodadi. .-.„.. 

Machine l anguage D.sk O ■-. v.- n.^ . 

Ho* Do HO' The TRS 80 i.v. #-►.■»■ 

TRS 80 Beginners Gu.de 

US.ng Super ut.kly . 3 * (all models.-. ■ ■- . w.- 

ADD-ONS & UPGRADES 



256KRAM 9pis t FuiiyeaiGua'a-tee 


Mode' 4 '2Bh "AM upgrade Kit w.m GenunePx 


25 '004 Mode' 


000 'si 256" RAM upg'ade Boaf 


25 '005 Mode. 


000 2nd D'Sk D"ve 








000 Rl 232 Board 


25 1009 Mode 


000, '200 5'2K R»MBoa": 


25 IO0" Mode' 


000 Hard D Sk Controller Bd 




000 2nd 256K RAM Upgrade Boa- 




000 Mouse ft L.'ock Calenda* 


25 10" Modei 


000 Memory Pius E "pans-o- Boa- 










25 '025 Mode 


OOO •OM'r.ie'' a »a'd Ds- 


Ou' o*n '0M internal Hard D-sk complete * "' . 



75 3040 Mode '200 Monoch'o'ne *dap'e- '86 
Same e.cep' ours Save ISSS 99 

25 3043 Mode' '200 Graph- sD'SPayAdapler 254 

Samee>reptoj-s Sa.eSSSt "3 

25 3044 Mode' '200 Tecnmar Graphics Master 499 

26 1 175 Model 3 M. Resolution Graphics Board '39 
26 1 1 26 Modei 4 m Resoiuto- G'apn.r s Boa'd 225 
26 1127 62 Mode- 3 4 Dn.eO «.t 399 

Same as above e.cepi ou' ora-n Sa.rJSSS 299 

Famous AE ROC OMP DDC Double Dens.'y Controls 99 

26 i ' 45 Modei i RS232 Boa'd w th cab* 89 

Modei 3 4 RS232 mstanaircm K.t less <ao<e 69 

26 "63 Radio Shack 40 T-ack D'Sk D-.e '.49 

Same as above e.cept 40 tracx Tando" sa.eSSS "9 

MODEL 4 |Mh Speedup Mod Add i'O'O' 4P 69 

Model 4 75tK RAM Board I .pands '0 ' MegaDy'e '99 

26 4104 Mode 2 "■ Resolution G'ap' s Boa'd 424 

26 4105 64k ram Boa'd 339 

26 4'67 8 Si.mi.ne Doub« s.de Dr.ve 339 

26 5140 Model 2000 H Resolution Graph.' s Boa'd 265 

26 5141 Mode' 2000 ( olor Graph, c Ch.p Se' '06 

26 5'44 Modei 2000 Mouse C'ock Boa-d 85 

26 5'60 Modei 2000 internal 1?8« Boa-d 15:1 

26 5161 Mode' 2000 I. te-a '78« Boa'd '8' 

26 5167 Model 2000 '28k RAM "j' 26 516' "0 

26 6010 Mode; 2 o' 12 'o Mode '6 68000 k • 699 

26 60" Mode 16 '28« RAM Boa'd 299 

2660l2Mode' '2 '28k ramk' 99 

26 6013 Mode '6 3 use' RS 232 Card - 69 

76 6016Modei '6 512k MAM k • 722 
Same e.cept ch.'s Save $$SS 330 

26601' Mi«le '2( aroCag- •-' 

BUY FROM US RIGHT NOW! 

Ou- mventorv ^ < *o la.ge I can no' d* istea tompet-teiy 
P'ease ca4i il you do hot see *t,jt yo« wan- Cna^ces a»e r,p 
"ave •! Because o' »ne lithe lag in magazine aOveniS'rq 
prices are suD(ect to c nange *ithouf not.ee anfl are ira» c 
der on-iy We a-e not 'eipons.b»e for Uixxj'i>^<a^ er'O's 
rota' company a"d O' pe'sonaicnetiTsa'e weiromeana Mil 
not detay iow orde- We use TeieC-e<-» P..?aseoDse'veme 
loHowng feo<-"' events and you' o'de' v%i.i be shipped »-.*•• 
out detay The check musi he d'a*n on 3 US* o- Canad ,' 
han« ana payao-e .n uS Dona-s it ">ust oe a Da'", jj"- teu 
check and conta^ your si-e«" acwess mot PO Bo» o' APO 
F ROi and te-eprx>ne numc*' The sigr.at^e m u si EXACTLY 
-natch the name pr-med on the cr-t*.k Tnats ai t^e-e sto • 
in -t,,.,ii>on <%e accept Amen-ar t ipress Masfe'ca*d V>sa 
C^she- s C"ec«s Wire I'Wet antj * r a'so ship COD 
COO s ana "Xrior t'eigM s'>ipme'<ts nia» '*«<ju:'«» a depost 
Some specai 'ten^s require deposits all COD s 'eciji'P 
cas'' or casiie's chec" o^ de-ivery Company a^o o' p«" 
sooai ' hecus ca" W oe accepted m payment o' COO s">p 
ments Cred't cards are not Ca-ged jntu eve sn-p v ou» o'V 
SHIPPING CHARGES ARE NOT INCLUDEO P«ase add S' 
namji.ng to a" orders totaling less t*ar SS0 Add $20 •^a'- 
diing ca-ge to a'i cde-s ove* Jf>00 sh.ppec to Canada" 
add'esses No State Sa«s Ta- 1 ofiected on Outo' state 
S""pmenls 'I you orde' Dy SPM you' o'de 1 a W S" pped 
the N(kT OAv < vtocI" s Qrh "a^c Hespo">. b ', -' 5u4a 
biiity o' so*twa'e r ests *-. « •*-«. ; - ,r ( hase' I)<n" ' "•*> • s'.'r 
u* t-.s bus ^ess '^e-e r- NO REFUNOS ON SOFTWARE. 
REPtACEMCNTS Wll L BE PROVIOED FOR DFFFCTIVF 
SOFTWARE ITEMS p'u..0ed*t.d'("'O-'HC*" • !.- !.„■ 
otde»we'>o'theme'.'and'se 1- yoj n dv e a pa" .. a- p' >n 

kT*' plt*ase 'all uS 'or nelp anrt '"SfuCt'Ons 

WARRANTY 

An -terns Larry the orig.namanu'aclure", warrant, vVe * 
be nappy to ma.i you a copy upo" 'eque'' 

CalLL rcxt rmtnOmtMYWMtMMTMt USA 

800-527-0347 
800-442-1310 
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DAVES MS-DOS COLUMN / by Dave Rowell 



3 



Bringing GW-Basic 
Up to Speed 



When 80 Micro techie Beve Wood- 
bury converted one of this 
month's graphics programs (Sinewave, 
"Window Screens," p. 58, Program List- 
ing 1 and Photo 1) from Model 4 BasicG 
to Model 1000 GW-Basic, she witnessed 
a profound drop in speed. The 1000's Ba- 
sic interpreter, like a bureaucracy, is 
large, complex, and sl-o-o-w. So I wrote 
the machine-language subroutine in 
Program Listing 1 that speeds things up. 
Sinewave (Program Listing 2) still won't 
move on the 1000 like it does on the 4, 
but at least it's in color. 

My explorations led me to three areas 
I'd like to discuss: using the Call state- 
ment, memory-mapping graphics, and 
using Debug with Basic. 

The Sinewave program displays a se- 
ries of overlapping framed windows (via 
the View statement) that rise and fall sin- 
usoidally and give you the illusion of 
three dimensions. The chief laggard is 
the window-clearing operation. The ma- 
chine-language subroutine clears them 
instantly, using the X and Y coordinates 
of the upper left- and lower right-hand 
window corners passed as integer vari- 
ables in the Call statement. (If you want 
to see how sluggish Model 1000 Basic 
graphics really are, replace the Call 
statement in line 1 10 of Listing 2 with a 
simple CLS.) 

The program runs on a 128K Tandy 
1000 even though graphics mode 6 (640 
columns by 200 rows, four colors) takes 
32K. This mode limits it to the 1000 and 
PCjr. You can modify Sinewave's ma- 
chine-language section to run in screen 
mode 2 on an IBM or 1200. 

Basic Points 

Here's how the Model 1000 version of 
Sinewave works. The Clear statement in 
line 10 limits Basic data space to 8,192 
bytes (2000 hexadecimal [hex]), enough 
for this small program. Clear also sets 



System Requirements 

Model lOOO 
128K RAM 
GW-Basic 




Program Listing 2. Assembly-language source code for Sinewave subroutine. 



10 CLEAR ,&H2000,,32768I : SCREEN : KEY ON : KEY OFF 

15 SCREEN 6 : DEFINT I-N : I=&H2000 

20 FOR J=I TO 1+230 : READ K : POKE J,K :NEXT J 

30 C=55 'the lower the number, the flatter the wave 

40 J=0:Z1=5:Z2=.9:A=1:B=12 

50 FOR X=A TO B STEP .15 

60 X1=20*X:Y=SIN(X) : Yl=119-C* (Y+l) 

70 IF C<0 THEN PRINT "TROUBLE C<0":END 

80 IF J>0 THEN C=C-.04 

90 IF J>0 THEN X1=X1+2:Y1=Y1-.01 

100 IF Xl<0 THEN X1=X1* -.1 

105 IX1=X1 : IY1=Y1 : IX2=Xl+Zl : IY2=Y1+Zl 

110 VIEW(X1,Y1)-(X1+Z1,Y1+Z1),,1:CALL I (IXl , IY1 , 1X2 , IY2) 

120 Z1=Z1+Z2:NEXT 

130 Z2=-Z2:J=J+1 

140 IF J=2 THEN 160 

150 A=12:B=23:GOTO 50 

160 IF INKEY§='" THEN 160 

1000 DATA 235,10,0,0,0,0,0,0,0,0,0,0 

1010 DATA 85,139,236,6,191,2,32,139,118,12,184,127 

1020 DATA 2,232,170,0,139,118,10,184,199,0,232,161 

1030 DATA 0,139,118,8,184,127,2,232,152,0,139,118 

1040 DATA 6,184,199,0,232,143,0,161,2,32,186,0 

1050 DATA 255,232,155,0,163,10,32,137,22,2,32,161 

1060 DATA 6,32,186,127,0,232,139,0,137,22,6,32 

1070 DATA 43,6,10,32,124,103,72,139,240,161,4,32 

1080 DATA 177,4,246,241,139,216,138,196,152,185,0,32 

1090 DATA 247,225,80,138,195,177,160,246,225,91,3,195 

1100 DATA 139,216,161,8,32,43,6,4,32,124,62,64 

1110 DATA 139,200,184,0,184,142,192,252,139,251,3,62 

1120 DATA 10,32,3,62,10,32,161,2,32,38,33,5 

1130 DATA 71,71,81,139,206,184,0,0,243,171,89,161 

1140 DATA 6,32,38,33,5,129,195,0,32,129,251,63 

1150 DATA 127,118,8,129,235,0,128,129,195,160,0,226 

1160 DATA 203,7,93,202,8,0,139,20,131,250,0,125 

1170 DATA 3,186,0,0,59,208,126,2,139,208,137,21 

1180 DATA 71,71,195,179,8,246,243,138,204,152,211,234 

1190 DATA 138,242,195 

End 
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THE ULTIMATE SOLUTION TO TAX PREPARATION 



PC -Tax 



for TaxPros 




PCTAX DOES: 

Give the serious Tax Preparer the finest, time- 
tested, most sophisticated Tax Preparation 
System ever devised. 

Supplies unlimited telephone support through the 
Tax Season. 

Ships systems to your order far in advance of the 
Tax Season, giving you time to familiarize and 
hone your skills. 

TO GET FACTUAL: Computes all tax amounts, all 
fixed & income-related limitations. Automatically 
totals W-2's, income averages, computes 
depreciation, etc., etc. 

Does returns twenty times faster than anyone can 
do them manually and ten times faster (100 times 
easier) than any other "Tax System," 100 times 
faster than sending them out to a service bureau. 



PCTAX DOES NOT: 



Offer a "hot-shot amateur" or two- or three-times 
failed system. (To the shame of the software field 
and the total exasperation of accountants, there 
were over 68 of these last season.) We hate it, but 
there it is. 

Doesn't require you to buy some oddball 
"operating system." You put our disk in your 
machine and it does taxes. That's all! 

Doesn't bug you or use up disk space with 
rainbow-colored "bouncing-ball" displays We 
figure you already have a TV. 

If you do income tax returns, you need PCTax, the 
truly professional, computerized income tax 
preparation system. Look into it today. 

Contract Services Associates. 507 Lead. 
Kingman, Arizona 86401. (602) 753-1133. 






CONTRACT SERVICES ASSOCIATES 



For FINAL solutions 

Circle 532 on Reader Service card 






DAVE'S MS-DOS COLUMN 



Program Listing 1. Sinewave Basic program for the Tandy 1000. 

/ WINDOW clears a rectangular area of the screen (to background) 

; in Basic screen mode 6 (high res, 4 colors) . The x and y 

; coordinates of the upper-left and lower-right corners are 

; passed in the Call statement ( ixl% , IY1% , 1X2% , IY2%) . 

code segment 

window proc far 

public window 

assume csrcode, dsicode 

org 2000H /start at 2000 Hex within Basic's space 



start: 

jmp 

; data 
xl 

yi 

x2 

y2 

lef tedge 



short pastdata 



dw 
dw 
dw 
dw 
dw 



pastdata: 

push bp 
mov bp,sp 
push es 



;save Basic's BP, then use it to 
;point to passed variables on stack 
;segment registers must be restored 



get variables from stack, check bounds, and store 



mov di, offset xl 
mov si, [bp+12] 
mov ax, 639 
call bounds 
mov si, [bp+10) 
mov ax, 199 
call bounds 
mov si, [bp+8 J 
mov ax, 6 39 
call bounds 
mov si, [bp+6] 
mov ax, 199 
call bounds 



;bx points to location of xl storage 
; location of xl on stack 



/location of yl 



/location of x2 



/location of y2 



determine left and right byte masks, store word position within 
line and count for columns in row (-2) 



ax,xl 

dx,0ff00H 

wmask 

lef tedge, ax 

xl,dx 

ax,x2 

dx,007fH 



mov 

mov 

call 

mov 

mov 

mov 

mov 

call wmask 

mov x2,dx 



sub 

jl 

dec 
mov 



ax, lef tedge 

leave 

ax 

si, ax 



/get left margin for division 

zpremask for left edge 

/determines mask word 

/number of word within line (0-79) 

/store mask in xl 

/get right margin for division 

zpremask for right edge 

/store mask in x2 

/subtract left word from right 

/if xl>x2 then get out 

/fudge 

/si stores coi. count 



/ determine memory location ot first row (in section 1,2,3 or 4) and 
/ number ot rows 

/get top y dimension 



mov ax,yl 

mov cl , 4 

div cl 

mov bx , ax 

mov al,ah 
cbw 

mov ex, 230!,':-: 

mul ex 

push ax 

mov al,bl 

mov cl,160 

mul cl 

pop bx 

add ax,bx 

mov bx,ax 

mov ax,y2 

sub ax,yl 

jl leave 

inc ax 

mov ex, ax 



/temporary storage of results 

/ax has word remainder 

/ax has video block memory location 
/save it 
/quotient in al 

/ax has offset in video block 

/put vid block addr in bx 

/ax has start video line address 

/keep in di 

/get lower bound 

/subtract upper bound 

/if yl>y2 then abort mission 

/fudge 

/use number of lines as count 



point ES to video memory (B800H) and set up loop parameters 
mov ax,0B800H /start of video memory 
mov es,ax /es points to it 
eld /inner loop (string move) increments 



loopl : 



/outer loop - set row/ do left edge 

Listing 2 continued 



aside the 32.768 bytes of high RAM 
needed for one screen of high-resolution, 
four-color graphics. Above Basic's re- 
duced work area, and below the over- 
grown video RAM. is room for the 
machine-code subroutine, even with a 
128K 1000. Changing from screen mode 
zero to 6 clears the screen rapidly. Wait- 
ing for the screen to clear in mode 6 in- 
duces sleep. 

The DEFINT statement in line 15 and 
the variable assignments in line 105 en- 
sure that the subroutine receives the 
window corner coordinates as integers 
(much easier to deal with). Line 20 
POKEs the 231 bytes of 8088 machine 
code (lines 1000-1190) into memory, 
starting at offset 2000 hex in Basic's 
data area (protected by the Clear state- 
ment). The Call statement (line 1 10) 
sends execuUon to that memory offset, 
stored in variable I, and pushes the lo- 
cations of the four passed variables onto 
the stack. The Call offset must be a var- 
iable. The subroutine replaces the slug- 
gish CLS statement. 

You can use two methods to reserve 
memory for machine-language subrou- 
tines in Basic. You can use the /M: pa- 
rameter to make space for your subrou- 
tine above Basic. It's invoked when 
loading Basic, and controls the size of 
Basic's data area — the default is the 
maximum of 64K. Or you can use the 
Clear statement to reserve space within 
Basic's data area. There's an important 
difference; a machine-language subrou- 
tine loaded above Basic isn't protected 
from a "child" process called by the Ba- 
sic Shell command. If you use Shell to 
load Debug above Basic, it'll load over 
any code Basic has put there. Use both if 
you want to shrink Basic's work space 
and protect your subroutine from a child 
process. 

Subroutine Source 

I used the Tandy 2000 version of 
MASM to assemble the source code on 
my 1000 and the MS-DOS linker to cre- 
ate an EXE file. Use the MASM assembly 
listing to get the actual code for the Basic 
Data statements. You can list it in hex 
format, e.g.. &HFF. I converted hex to 
decimal for easier typing. 

When accessed by a Basic Call, your 
subroutine should first set up the BP reg- 
ister to point to the passed variable lo- 
cations on the stack. The Basic manual 
explains this process. Remember that 
the values stored on the stack are not the 
variables themselves, but their offset in 
Basic's data segment. The locations are 
on the stack last in/first out. but above 
the 4-byte return address and the 2-byte 
BP register you've pushed onto the 
stack. The far return that ends the sub- 
routine must throw off the number of 

Conlinutti on p 98 
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Circle 363 on Reader Service card. 



PERIPHERALS 

64K Chips 

256K Chips 

128K Piggy Back Chips 

(At Compatible) 

IBM Color Card 

Bulk Diskettes 

10 Pack of Diskettes 
2 Drive Cables 


c 

90 

3.95 

..4.95 

125.00 

..8.00 
19.00 
ds 

el, 

150.00 


'heck it Out! 

THIS MONTH'S 
SPECIAL 

10 MEG HARD DISK 
& CONTROLLER 
V $485.00 > 

\ (FOR IBM & ALL v^ 
>w IBM CLONES) S 

yT DRIVES ^ \w 

/ TEAC \ 

r F055B BARE 
40TRR DSDD 
$90.00!! 

TEAC FD55F Bare 

DSDD80TRK 135.00 

Drives w/case & 

Power Supply add 45.00 

Dual Case add 50.00 


PRINTERS ^ 

StarSGIO 239.00 | 


StarSG15 425.00 j 


Epson LX80 239.00 


Epson FX85 385.00 


Epson FX185 525.00 I 




IBM Multi Function Ca 
(Clock, Serial, Parrall 
Calendar, Memory 
Expansion to 384K) . 


Printer Cable (TRS80) .. .21.00 
IBM Printer Cable 15.00 I 


ONE YEAR WARRANTY 


TANDY 
1000 
j vv/10 meg 
HARD DISK 
$1299.00 




MODEMS ^ 

Hayes 300 Baud 175.00 

Hayes 1200 Baud 375.00 
Express 1200 Anchor . .339.00 
V^^ RS232 Cable . .14.00^^^ 

^^^^MODEMS i/^^^,. 
^^ INTERNAL ^ 

Hayes 1200B 375.00 


^^^ IBM 
**"^ PCXT w/2 Drives 

256K $1749.00 

IBM PCXT w/2 Drives 

256K & 10 meg 

Hard Disk $2395.00 


Maxell 1200B 325.00 


IBM RS232 Card 79.00 


CALL FOR 

FREE SHIPPING 
IN THE USA 

P.O. BOX 3 




DEALER INQUIRIES 
INVITED 

• (313)483-2080 

* Prices Subject to Change 


[MiCom] 

TO ORDER CALL OR WRITE: 
97 • FARMINGTON HILLS, Ml 48024 
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Price Changes 

Occur On A 

Daily Basis. 

Please Call 

1-800-343-8841 



PRICE BREAKTHROUGH 



Price Changes 
Occur On A 

Daily Basis. 

Please Call 
1-800-343-8841 



MEGA HOLIDAY SPECIAL CALL US! 

Super Sale on New Hard Drives 




Introducing 



MEGADISK" 



Winchester Hard Drive Ready to 
run on the TRS 80 Model I/III/IV/4P, 
Color Computer, I.B.M.-PC, Max/80. 
Software Drivers: LDOS, NEWDOS/80, 
DOSPLUS, TRSDOS 6.x 
Fully Warranteed *Montezuma Micro CP/M available 

DRIVE A HARD BARGAIN" starting at $499.95 



MEGAPLEX your Megadisk for $499.95 

Use up to 10 computers, multiplexed with 1 megadisk 
For the TRS-80 models I, III, IV, 4P and Max/80 



Call Toll Free Ordering 1-800-343-8841 

$269.95 SPECIAL 

Disk Drive Upgrade Kit 
for Model III/IV easy to install 
system — no soldering. 
Complete with controller, towers, 
power supply, 1 disk drive, cables, 
and easy to follow instructions. 
Starting at $269.95 
Second Drive $89.95 

CANADIAN CUSTOMERS PLEASE CALL 514-383-5293 




80 



1985 



SOFTWARE SUPPORT, INC 



1 Edgell Road, Framingham, MA 01701 (617) 872-9090 Tclcx-383425 

Hours: Mori, thru Fri. 9:30 am lo 5:30 pm (r-.S.I.i Sat. 10 am lo 3:30 pm 

SERVICE POLICY — Our Professional Technical Staff Is Available To Assist You Monday Through Saturday. 

WARRANTIES — Up To One Full Year Parts And Labor. Floppy Disk Drive Power Supplies — Five (5) Years. 

SERVICE — 24 Hour Turn -A- Round On All In-Stock Parts. Dealer Inquiries Invited. Call 617-872-9090 

SSSS^KS Toll Free 1-800-343-8841 

Cash Discount Prices Please Call For Our Latest Price Saving Specials. 



Nni Responsible for l> pographii jI t.rrurv 
Prices .mil Specil'icilions Mas Chant!? 
Uilhoui Notice 
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Prices Change 

Every Day. 

Please Call 

1-800-343-8841 

For Lower Prices. 



PRICE BREAKTHROUGH 



DEALER INQUIRIES INVITED 



Prices Change 

Every Day. 

Please Call 

1-800-343-8841 

For Lower Prices. 



megadisk™ hard disk drive systems TOLL FREE ORDERING 1-800-343 

For the f IBM/PC < T^y ,00 °. TRS/80 Models I/IU/IV/4P, Compaq, Tava, PC Workalikes, Color Computers, Heath/Zenith, Max/80 

C Complete with Hardware, Cables, Software and Quikfit Installation 

Megabytes Internal Mount IBM/PC 1 . jS starting at ! 

starting at 



5 
10 

20 

5 

10 

20 



Wowr 



Ateiv 



Megabytes Internal Mount IBM/Tandy 1000 

Megabytes Internal Mount IBM/Tandy 1000 

Megabytes External System 

Megabytes External System 

Megabytes External System 

Tape Backup System — Internal Or External (IBM/PC) 

f IBM/Heath — DOS, 1.0, 2.0, 2.1, 3.0, or later 

\ TRS/80-LDOS, TRSDOS 6.x, Newdos/80, Dosplus, CP/M, COCO DOS, Max/80 LDOS, OS9 
FULLY WARRANTIED — PARTS AND LABOR — 24 HOUR SERVICE — CALL TOLL FREE — 



knvjv 



'ce s 



starting at 
starting at 
starting at 
starting at 

starting at 



-8841 



279.95 
439.95 
579.95 
499.95 
749.95 
899.95 
449.95 



DOS Systems Available: 



1-800-343-8841 



FLOPPY DISK DRIVES, POWER SUPPLIES AND CABINETS 

Our Disk Drives are UL approved - Our Floppy Drive Cabinets and Power Supplies 
are Underwriters laboratory Listed and have passed the required Federal 
Communications Part 15 Section B-EMI/RF1 tests. 

Warrant) on all disk drives is one full year parts and labor. Warranty on floppy disk 
drive power supplies is five (5) yean. In warranty or out of warrant) service is 24 hour 
lurn-a-round on all disk drives and power supplies. 

Full Height — Taadon 

100-1 Single Sided 40 tk Bare $ 99.95 

In Case with Power Supply 139.95 

Dual Drives in One Cabinet , . 239.95 

100-2 Dual Sided 40 tk Bare 109.95 

In Case with Power Supply 149.95 

Dual Drives in One Cabinet 259.95 

Half High Drives — Tandon/TEAC 

Single Sided 40 tk Bare 79.95 

In Case with Power Supply 119.95 

Dual Drives in One Cabinet 209.95 

Dual Sided 40 tk Bare 109.05 

In Case with Power Suppls 149.95 

Dual Drives in One Cabinet 259.95 

Apple Franklin Disk Drives 

35/40 Track in Case with Cable and Software 129.95 

Commodore Disk Drives 236.95 

Power Supplies and Cabinets 5 . ■ and Hard Drive Systems starting at 42.00 



COLOR COMPUTER DISK DRI\E SYSTEMS AND ADD IN PRODUCTS 

40 Track Single Head Drive with Case Power Supply. Cable - 

Controller. Instruction Booklet. Diskettes SO* ' 1 * *^V2 v * 

Above with Dual Drives in One Cabinet c*^ 1 89lB < 

40 Track Dual Head with Case. Power Supply. Cable, 

Controller, Instruction Booklet. Diskettes 259.95 

Above with Dual Drives in One Cabinet 379.95 

Dual DOS Switch 29.95 

With Second DOS System — JDOS. RSDOS. and Booklet 69.95 



MODEMS 

Vulksmodcm 300 Baud $ 69.95 

Signalman Mark X Autodial 123.95 

Mark XII 1200/300 Baud Autodial 284.95 



ALL IN-STOCK ITEMS SHIPPED WITHIN 24 HOURS. SAME DAY SHIPPING 
PROVIDED BY REQUEST WITHOUT ANY EXTRA HANDLING CHARGES. 



............ MEGADISK SPECIAL «**»*••***• 

Megaplex your Megadisk. Use up to 10 TRS-80 Model I, III, IV, 4P, 
Max/80 computers with one hard disk. Prices starting at $499.95 



IBM - PC/XT WORKALIKE 
All of our computers have: 8 slot motherboard, 640K, monochrome adapter, parallel 
printer port, 130 watt power supply, free software, monitor, serial port, clock calendar 
- all with our full warranty. 

I'C - 2 Floppy Drives - Monochrome Monitor, MS-DOS $1,299.00 

5mcg/XTtra • I Floppy Drive - Monochrome Monitor. MS-DOS $1,599.00 

lOmeg XTtra - 1 Floppy Drive Monochrome Monitor. MS-DOS . 1. 799.00 

20meg XTtra - I Floppy Drive Monochrome Monitor, MS-DOS 1.995.00 

Internal Tape Backup For Any Of Above systems Add $449.95 

Color for above systems 500.00 



PRINTERS 

Dot Matrix 

Citizen $ Call 

Star Micronics — S.G Series starting at $259.95 

Panasonic 1090 249.95 

Daisy Wheel 

Silver Reed 440 80 Column 12 CPS 315.95 

550 132 Column 19 CPS 439.95 

770 132 Column 36 CPS . 895.00 

Olympia 132 Column 14 CPS with Form and Tractor Feed 399.95 

•\pple Franklin Printer Interface w/Graphics and Cable 84.95 

Printer Cables starting at 19.95 

Printer Paper — Microperf Edge 1000 Sheets 16.95 



ELECTRICAL 

Surge Protectors — line filters SI Waber — 6 Outlets with Switch $ 39 95 

Umnterruptablc Power Supplies ?°9.95 

MISCELLANEOUS 

Diskettes in 10 Pack from $ 9.95 

Twoprint Switches from 99.95 

Disk Drive Cables from 16.00 

Maintenance Cleaning Kits 12.00 

Parallel Printer Buffers 8K 149.99 

floppy Disk Drive Cables 

1 Drive 16.00 

2 Drives 18.95 

Heath. Zenith 2 Drive Cables -Shielded 24.95 
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SOFTWARE SUPPORT, INC 



Edgell Road, Framingham, MA 01701 (617) 872-9090 Telex-383425 

Hours: Mon. ihru Fn. 9:30 am to 5:30 pm (L.S.T.) Sat. 10 am to 3:30 pm 

SERVICE POLICY — Our Professional Technical Staff Is Available To Assist You Monday Through Saturday. 

WARRANTIES — Up To One Full Year Parts And Labor. Floppy Disk Drive Power Supplies — Five (5) Years. 

SERVICE — 24 Hour Turn -A- Round On All In-Stock Parts. Dealer Inquiries Invited. Call 617-872-9090 

3EEZZSS2 Toll Free 1-800-343-8841 

Cash Discount Prices Please Call ror Our Latest Price Saving Specials. 



Not Responsible for Is poitniphic.il Error.. 
Prices and Specifications Mas Change 
VSilhoul Notice. 
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DAVE'S MS-DOS COLUMN 



Listing 2 continued 






mov 


ui , bx 


;start of row 




add 


di, lef tedge 


;start in row in words, but 




aad 


di , lef tedge 


;must be in bytes 




mov 


ax, xl 


;get leftmask 




and 


es : [di] ,ax 


;do left edge of row 




inc 


di 


; point to next column 




inc 


di 


;which is next word 




; inner 1 


aop - print 


row (center bytes if any) 




push 


CX 


;save outer loop counter 




mov 


ex, si 


;number of inner columns 




mov 


ax,0 


;things will be black 




rep stosw 


jshove those words 




pop 


ex 


.•recover outer loop counter 




; display 


right byte 


(leave outside of rectangle untouched) 




mov 


ax, x2 


;get .right mask 




and 


es: [di] ,ax 


;do right edge 




; adjust 


for next row 






add 


bx,2000H 


;point to next video block 




cmp 


bx,7f3fH 


;is it above video memory 




j be 


continue 


;if not then cont. 




sub 


bx,8000H 


;if yes then put it in lower block 




add 


bx,160 


;and point to next row 




continue : 








loop 


loopl 






leave: 








pop 


es ) 


restore registers for Basic 




pop 


bp 






ret 


8 I 


discard 4 passed words and return (far) 




window 


endp 


check bounds of passed variable and store it 




; near subroutine to 


bounds 


proc near 






mov 


dx, [si] 


;si points to Basic variable 




cmp 


dx,0 


;is variable greater than 0? 




jge 


pos 






mov 


dx,0 


;if not, than make it 




pos: cmp 


dx, ax 


;does variable exceed limit? 




jle 


less 






mov 


dx,ax 


;if greater than set at limit 




less: 








mov 


[di] ,dx 


;store variable 




inc 


di 


;point to next storage area 




inc 


di 






ret 








bounds 


endp 


determine mask word for left or right edge 




; near subroutine to 


wmask 


proc near 


;premask in dx, x-coord. in ax 




mov 


bl,8 






div 


bl 


;divide x-coord. by 8 




mov 


cl,ah 


;put remainder in counter 




cbw 




;ax has quotient (word in line) 




snr 


dx,cl 


;right byte of ax is mask 




mov 


dh,dl 


;both bytes of mask are the same 




ret 








wmask 


endp 






code ends 




end 


start 




End 



bytes used to pass the variable loca- 
tions— RET 8 in this ease— or your com- 
puter will hang up. 

Storing data in the subroutine code, 
as I have, creates complications. The 
machine-language instructions are all 
position-independent; the data is not. 
The ORG 2000H directive provides that 
data offsets correspond to where they're 
POKEd in Basic's data segment (starting 
at 2000 hex). When the machine code 
requests the word stored at offset 2002 
hex. it'll be there. 

I also put DS in the Assume direc- 
tive so the assembler doesn't add a 
CS: prefix to every data reference be- 



cause an extra byte for each reference 
adds up. The first Jump instruction 
(past the data) just makes it easier to call 
the subroutine: the first instruction is 
the entry point. I could have put the data 
at the end. 

The interfacing approach I took, stor- 
ing the subroutine in Basic's data area, 
is the most flexible when you want to 
run a program on differently configured 
machines. Because the subroutine's load- 
ed relative to Basic's data area, it isn't set 
at any specific memory location. If you 
use only one memory configuration, and 
know where Basic loads (see below), you 
can put your code at a specific memory 



location above Basic by POKEing data in 
a loop, or by BLOADing a binary file. In 
either case, you must first change the CS 
register (with DEF SEG) to point to the 
desired memory location. Remember 
that the value in a DEF SEG statement 
is a segment address, i.e.. the actual ad- 
dress divided by 16. 

If you load your subroutine at a set 
address, and have a data area in your 
subroutine, you can usually save some 
bytes by using DS to reference the data 
locations. As in Listing 1 . include DS in 
the Assume directive so the assembler 
doesn't add a CS: override to each refer- 
ence. Because you're not using Basic's 
data area in this case, you must load the 
DS register with the contents of CS (after 
saving DS, of course). But remember that 
the variable location offsets passed in the 
stack are in Basic's data segment. You can 
use an ES override prefix to get these val- 
ues after loading ES with the Basic data 
segment. You must restore all segment 
registers other than CS before return. 

Beware of the Tandy 1000 Basic man- 
ual on this point. It's sprinkled with 
statements that DEF SEG alters the DS 
register. This just isn't true: only the CS 
register changes. If you disregard this 
rather fundamental error and consult 
the IBM manual, the Tandy manual is 
quite helpful. 

Memory Mapped 

I used direct video memory address- 
ing to clear the desired screen area. BIOS 
calls that set pixels, though easier to 
code, aren't fast enough. The screen 
modes and addressing are exactly like 
the PCjr's. Location of video memory in 
RAM depends on memory size, but you 
can always address it through a 32K 
window beginning at memory location 
B8000 hex (segment B800). You pay no 
time penalty for addressing video mem- 
ory through this window, and it's always 
at the same location. I used the String 
Store command (STOSW) to move zeros 
quickly to areas of video memory, black- 
ing them out. Therefore, I set the desti- 
nation segment register (ES) to B800 
hex, the video window. 

I chose the most complicated graph- 
ics mode to get high-resolution and 
color, too. It takes 2 bits per pixel to code 
for four colors, but the two pixels are in 
different bytes of video RAM. Every 2 
consecutive bytes code for eight pixels 
with corresponding bits in the 2 bytes 
coding the color of one pixel. 

If the left-most bit (7) of hex bytes 
B800:0000 and 0001 is set. the pixel in 
the upper left screen corner is white (de- 
fault palette). If both bits are zero, the 
upper left pixel is black. Combinations 
of set and unset bits produce cyan and 
magenta pixels. Bit 6 of those 2 bytes 
codes for the next pixel in the top row. 
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Circle 181 on Reader Service card. 




Sstling to Micro mfi mate money for you. Consider the facts? 
Fact #1: Selling 89 Micro increases store traffic — our dealers 
tell us that 80 Micro is the hottest-selling computer magazine 
on the newsstands I 1 1 

Fad #2: There Is a direct correlation betfeen store traffic 
and sales— increase the number of people coming through 
your door and yoi^ll increase sales. 
Fact #3. FacUl + Fact #2 = INCRaSEO $ALE$, which 
meanB money for you. And that's a fact. 

For information orj selling 80 Micro, call 80CKKW728 and 
speak with our dicer sates manager. Or wtte to 80 Micro, 
Direct Sales Dept.^ 80 Pine St., Peterborough NH 03458. 



EXPAND THE TANDY 2000® 
TO 



OF DOS ADDREBBABLE RAM 

Includes RAMdisk Software at No Extra Cost ... 

Add 640K of External RAM Memory to TANDY 2000s 1 
256K of Internal RAM Memory for a total of 896K of DOS Ad- 
dressable RAM. 

' Uses only one (1) External Memory Card Slot 
* RAMdisk Software is included with the price. 

$495.00 for a 640K bytes of External 

COSuI RAM Memory Board (Includes RAMdisk 

Software) 

Call about our Trade-in Exchange option 
if you already use Tandy's 128K External 
Memory Board. 



for ordering 

and informetion coll: 



(509) 627-5291 
Hours 9:00-5:00 PST 



We accept Check, MO, Visa. Mastercard 
tiSPmS: Add 7.3% sales tax in Wash. 

Add $3-shippingrhandling, $5 foreign. 

TANDY 2000* IS A TRADEMARK Of TANDY CORPORATION 

RAMctt* a a RmneJomA oMi Mmi uy bmmH OWr 



ENVISION DEBIONB 

1909 ORCHARD WAY • RICHLAND. WASHINGTON 99352 



Circle 152 on Reader Service card. 



NEW PRINTERS ADDED! FIND YOURS BELOW. 

Good This Month 



PRINTER 

WAKE MODEL NUMBER 

Contact us it you' primer is 

not listed We have many more in slock 

We :ar. probably RELOAD your old cartridges 



RIBBON SALE 



EXACT REPLACEMENTS 



BASE 2, DIP 81 82 84-85, MPI 88 99 GX 



RIBBON 
SIZE 

Inches 

by 
Yards 



C ITOH Prowriter 1550-8510, NEC 8023-8025. APPLE DMP imagew 



C ITOH STARWRITER F 10-40 
DIABLO HYTYPE II , 



Carbon Film Black 
Fabric Black 



1 ?i20 



RADIO SHACK TOSHIBA COMMODORE PANASONIC RICOH 
Carbon Film - DWP 210 (Hylype II) Black (1445) 

DW II. DWP 410 510. RICOH 1200-1300 1600 Black (1419) 

Red. Green. Blue. Brown Colors (1419) 

Fabric (Long Life). DWP 210(Hytype II) Black (1458) 

DW II. DWP 410-510, RICOH 1200 1300 1600 Black (1449) 

DMP-100. LP VII. COMMODORE 1525. GORILLA BANANA (1424) 
DMP-200, 120. (430 Inserts* Reloads Only) (1296)0483) 

DMP 400-420. LP VIVIII. PANASONIC KXP-130 • 1093 (1418) 

DMP 500 (1482) 

DMP-2100, TOSHIBA P1340-1350- 1351-351 (1442) 

LP III IV. CENTRONICS 730-737 739 779 (Zip Pack) (1413) 

LP III V (1414) 



EPSON LO 1500 

MX-FX-RX 70-80, IBM PC (Standard Paper) LX80<sn6 » 7) 
MX-FXRX100. IBM PC (Wide Paper) 



5/16 • 145 
1'4 i 145 

1.-4 « 130 



NEW CARTRIDGES 

manufacturers or made 
in our own shop 

Ready to use 



S20/2 S57/6 $108/12 



S15/2 S42/6 S 78/12 

$342/72 
$ 96/12 



RELOADS 

You SEND you' used 

CARTRIDGES lo us WE 

put OUR NEW INSERTS 

in them 



INSERTS EZ LOAD- 
DROP in NO WINDING' 
EXACT REPLACEMENTS 

made n oui o*n shop 
Ca'H.ilqes NOT included 



$7/1 



S6. 



$15/3 $54/12 $288/72 



$7/1 



$6ea 2< 



$18/3 $60/12 
$18/2 $51/6 



112 « 20 
S/16 < 14 



9116 i 16 
112 « 15 



$18/3 
S18/3 
$21/3 
$18/2 
$18/2 
S18/2 
$20/2 
$15/2 
$22/2 
$15/2 



$60/12 

$60/12 

$72/12 

$51/6 

$51/6 

$51/6 

$57/6 

$42/6 

$63/6 

$42/6 



$342/72 
$342/72 
$414/72 
S 96/12 
$ 96/12 
S 96/12 
$108/12 
S 78/12 
$120/12 
$ 78/12 



S5ea3 11 S4ea12o'mo.e 
$8/1 $7ea 2 or more 



$15/3 $54/12 $288/72 



$24/6 $42/12 $234/72 
$21/3 S78/12 $432/72 



$15/2 $42/6 S 78/12 



1/2 « 30 



$20/2 
$14/2 
$18/2 



$57/6 $108/12 
$36/6 $ 66/12 
$51/6 S 96/12 



$5ea3 11 
$5 e. 3-11 
$6ea3-11 
$8/1 
$8/1 



$4ea 12o'mce 
S4ea 12 or more 
S5 ea 12 o< more 
$7 ea 2 or more 
S7 ea 2 or more 



$7/1 


S7ea 


2ofmo.e 


$7/1 


$6ea 


2 or more 


$7/1 


$6ea 


2 or more 


$7/1 


S6ea 


2 or more 



$7/1 



$6. 



2 or 



$7/1 
$7/1 
$8/1 



S6ea 2 or more 
S6ea 2 or more 
$7 ea 2 or more 



S24/6 $42/12 

$24/6 $42/12 

$30/6 S54/12 

$21/3 $78/12 

$21/3 $78/12 



$234/72 
$234/72 
$234/72 
S432/72 
$432/72 



$15/3 
$15/3 
$15/3 
$15/3 
$12/3 
$15/3 



$54/12 
$54/12 
$54/ 12 
$54/12 
$45/12 
$54/12 



$288/72 
$288/72 
$288/72 
$288/72 
$252/72 
$288/72 



$15/3 
$15/3 
$18/3 



$54/12 
$54/12 
$66/12 



$288/72 
$288/72 
$360/72 



NEC Spinwriter Carbon Film 2000-3500 (Reloads BccoMPCOOniyi 
5500-7700 (Can Reload Most Types) 
-Fabric 2000 3500 (Can Reload All) 
5500-7700 iCan Reload All) 
Pinwriter P1-P2 
P3 



S/16« 145 
1)4 i 145 
1)2 i 14 
1/2 « 13 
112 > 20 
1/2 « 27 



$21/3 
$18/3 
$18/2 
$15/2 
$25/2 
$30/2 



$78/12 

$60/12 

$51/6 

$42/6 

$69/6 

$84/6 



OKIDATA Pacemark 2350-2410 Black 
Microline 182-192-193 

ML 80 82 83 92 93 (Can 'or ml 84 Pr 



MANNESMAN TALLY MT-160 
MT 180 
Spirit 80 (SP80) COMMODORE 1526 iM u it,stnkei 



PANASONIC KXP 1090 1091 1092 



BROTHER HR 15-25-35 
COMREX DX-15.II 



Carbon Film IMultiStrike or Correctable) 
Fabric (Call lor Comre> 420 Prices) 



1/2 i 100 

Inker Loop 

1/2 i 16 



$20/2 
$21/6 



$450/72 
$342/72 
$ 96/12 
$ 78/12 
$126/12 

$1 56/12 

$32 each 
$57/6 $108/12 
$36/12 $198/72 



S5ea3-11 

$5ea3-11 

$8/1 

$8/1 

$7/1 

$8/1 



$4 ea 12 or more 
$4ea 12 or more 
$7ea 2 or more 
$7ea 2 or more 
$6 ea 2 or more 
$7ea 2 or more 



$20/1 



$18 ea 2 or more 



S24/6 

$24/6 
$15/3 
$15/3 
$15/3 
$18/3 



$42/12 
$42/12 
$54/12 
$54/12 
$54/ 12 
$66/12 



$234/72 
$234/72 
$288/72 
$288/72 
$288/72 
$360/72 



$36/3 $132/12 $720/72 



9mm i 1 
9mm . 1 
1/2 i 35 



Inker Loop 



5/16 « 82 
5/16« 17 



$19/2 
$20/2 
$16/2 



$54/6 $102/12 
$57/6 $108/12 
$45/6 $ 84/12 



$20/2 S57/6 $108/12 



$18/3 
$15/2 



$60/12 
S42/6 



$342/72 
S 78/12 



SEND CHECK MONEY ORDER OR C O TO 

^f BCCOMPCO 

^^™ 800 South 1 7 Box 246 
Summersville, MO 65571 • (417) 932 4196 

WE PAY UPS GROUND SHIPPING on PREPAID ORDFRi 

P. EASE INCLUDE STREET ADDRESS tor UPS DELIVER 

FOREIGN ADD 15% US FUNDS 

MISSOURI RESIDENTS ADD 1 ) SALES TAX 
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Circle 352 on Reader Service card. 



Circle 437 on Reader Service card 
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N EcessM* BOtEC tio« x 



FOR VOUR COMPUTER EQUIPMENT 



PRO-TECH-TOR' 




ELECTRONIC OUTLET CENTER 

MP 

TRANSIENT VOLTAGE SURGE SUPPRESSION 
RH'EMI RLTERAIION 

• absorbs 'iT\ 

6S00V \j\ ; 



I aosocOs 2 YEAR 

4000A LIMITED 

JO*«I WARRANTY 



• * * ALL* * * 

• AMERICAN 
parts 1 assembly 



A MUST FOR SYSTEMS WITH HARD DISKS 

• meets IEEE guide hnes lor surge suppression o 

This unit is simply me oesi mena your equipment can nov* - wrtn oil ihiee mooes ol surge 
suppression ond EMI RH Wtefing Ppeven' power line events from damaging sensrfce 
••cirorm: comoonents u»ra fast - Mgr quotty - includes arVrmportonf LED to indicate 
pfoiection circuitry is tunctional (units witftout ifiis feature connot De trusted ) Satisfaction 
guoianteed 



Lisl price >39 ' 



EiclusiyrerV Irom 



SUPER INTRODUCTORY OFFER: »24. ,i * 

FAST DELIVtRY (*DtuS 52 s n) 

24 rtour order des* 



NJ resKJents add 6% sows ta» 



NORTHEAST PERIPHERALS. Irvc 
RD "1 BOX 44 m 
SOMERSET NJ0M7J 



800/526-2396 
m NJ 201 7356-3727 



ATTENTION DEALERS We ore aware mat your distributors Have been 4Mb. 
charging vou more lor similoi units Call us lor volume discounts Qijr 



FOOTBALL 



36 Off. Plays 

27 Def. Plays 

Large Manual 

Save Teams 

Create Teams 

Control Game Time 

TRS-80 III/4 

Uses 48K 2 Disk Drives 

MUCH MORE! 

$34.95 + shipping 





PO Box 394 

Nottingham, PA 19362 

24 hr. phone (215) 932-5395 



HIGHLIGHTS from PORTABLE SOFTWARE INC. PUBLIC DO- 
MAIN Original assembly lang. routines to study-include in BASIC 
progs. Also Machine lang. communication prog. Progs. FREE. Service 
charge $10.00 + ship. 

EDUCATION Drill in a game setting for grades 3-8 

CHAIN-drills chained arith. problems (13+ 10/2 = ?) $27.95 

FACTOR— Great PREALGEBRA drill in number facts $27.95 

ESTIMATE— drills estimation, our weakest skill $27.95 

GAME STALAG 12-ad venture game to test your wits as you try to 

escape from WWII prison camp $22.95 

THESE PROGRAMS WILL RUN ON 32K 1 DISK SYSTEMS 

Choose at leaat 3 and deduct both 25% & •hipping 

Add $2.75 Ship/order. Send for complete cat. with over 50 games/utilities for 

TRS 1II/1V & Osborne ( 1 & Exec) 

(TRS-80 Trademark of Tandy Corp. ) 



Circle 96 on Reader Service card 




catch the next micro-wave with 

UO-LISP 

Not "just another pretty dialect" but the most 
powerful implementation of LISP available in 
the micro market place. For the professional 
engineers, researchers, and educators, UO 
LISP maintains the power and flexibility 
inherent in LISP while providing the expected 
functionality of mainframe LISP systems. ( + 
UO-LISP steps beyond the competition 
and provides a real source to native code 
compiler. 



CPU 

Family 




LISP 

The preferred symbolic processing language 
of the Artificial Intelligence Community 



Operating 
System 





/ 


MSDOS 


8086 


/ 


PC DOS 


\ 




s 


CPM86 



Z80 



K 



CPM 



TRS DOS 



Production 
System 



150°° 
150 00 

available soon 

125 00 
80»o 



Learn 
System 



85 00 
85°° 



85°° 

N/A 



Production 

plus Learn 

System 



185° 
185° 



160°° 

N/A 



For MORE DETAIL AND TO ORDER: 

Send for FREE brochures ond order forms. 



NORTHWEST COMPUTER ALGORITHMS 

P.O. Box 1747, Novato, CA 94948 

415-897-1302 
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EZ 



DAVES MS-DOS COLUMN 



Because the 8088 CPU deals in bytes 
and words, complicated graphics in- 
volves lots of bit manipulation. 

To further complicate things, the 1 60- 
byte rows are not arranged contiguously 
in memory. The 32K video space is di- 
vided into 8K sections, every section 
containing every fourth screen row. but 
not the same rows as any other section. 
B800:0000-1F3F contains rows zero. 4. 
8, 12. and so on through 196. The next 
section has rows 1, 5. 9. 13. and so on 
through 197. 

I used 2 -byte masks to And the left 
and right edges of the window being 
cleared. Both bytes in a mask are the 
same, and zeros in the mask correspond 
to pixels to be blacked out inside the win- 
dow. The area in a row between the 
masked edges comprises whole words 
representing eight-pixel groups. You can 
quickly clear these by loading the corre- 
sponding words with zeros via a String 
command. Most of the program deter- 
mines which row to start on and how 
many rows, which word in each row is 
the left edge and how many words to the 
right edge, and what masks to use on the 
left and right edges. 

Debugging from Basic 

Debugging Basic machine-language 
subroutines on the 1000 isn't easy. GW- 
Basic is an EXE file and can load any- 
where in memory (but always in the 
same place under given conditions). You 
can find Basic's data segment from Basic 
by executing the following line right 
after loading it: 

PRINT HEX$(PEEK(&H04A6)): HEX$(PEEK 
(&H04A5)) 

Basic will use the 64K area starting at 
this memory segment as long as you 
don't add a driver or memory-resident 
program. With this information you can 
determine where in memory to put a 
subroutine, or know exactly where 
yours loads if it's in Basic's data seg- 
ment. You can then load Debug via the 
Shell statement and explore your sub- 
routine in situ. 

I have yet to figure out how to load 
Basic from Debug and run it with a stop 
point set at a subroutine, as I can on an 
IBM. It just doesn't stop. Let me know if 
you've found a way. 

Sorry DeskMate 

DeskMate doesn't work as an all-pur- 
pose text editor (I'm embarrassed to dis- 
cover now). DeskMate can't write batch 
files or source files for Microsoft's assem- 
blers and compilers. 

GW-Basic is very forgiving, however, 
and takes listings DeskMate writes. 
DeskMate requires that you end text file 
names with the DOC extension or it 
won't load them. 



I'll summarize. DeskMate text files 
are pure ASCII files with code 26 (1 A 
hex) ending files. In true Tandy style, 
however. DeskMate's text editor uses 
only carriage return (ASCII 13) to end 
lines, and not CR/LF (13/10) as do MS- 
DOS programs. Edlin, MASM, and the 
DOS batch file processor expect 10 to fol- 
low every 13, but they'll take any char- 
acter — I mean any — in its place. If you 
write a batch file with DeskMate and 
start each line after the first with a space, 
it'll run because they assume the extra 
character is 10. When DeskMate loads a 
text file written by Edlin (or others), it 



replaces the line feed code (10) with an 
ASCII space. Leave it there so Edlin will 
think it's a line feed character. 

GW-Basic loads a program whether or 
not it finds the line feed code as is or re- 
placed with a space. Don't try to load 
files created with the Copy command 
(COPY CON file name) with DeskMate be- 
cause they don't end with an ASCII 26 
(code for end-of-file). So you can use 
DeskMate if you're in a bind.B 

Address your correspondence to 
Dave Rowell. 80 Micro. 80 Pine St., Pe- 
terborough. NH 03458. 



Circle 134 on Reader Service card. 



Here are 87 reasons to 
buy at Elek-Tek. not to 
mention the fastest 
delivery anywhere. 



LMEGA 

BERNOULLI BOX 

1. 10 meg '2 height Drive lor 
iBM-PCXW & 

corroat bles $ 1675 

2. 20 meg ' i height Drive for 
IBM-PCXT.AT& 
compatibles 2335 

3. Nor Bootable ■"te^ace Card 104 

4. Bootable l -te^ace Card .234 

5. 10 meg carnages 'or above 
(3 oak soecal) 125 



23. Amdek310A 

A~oe' Moo tor S 150 

24. Generic Multi 

Ml* lunct 0-. Boa-d 64K. . . . 129 

25. Generic Multl 3B4K 

Mu t Vrct on Board. 384K . . 169 

26. AST Six Pak + 
Vjt'uocto" Board 64K ..225 

27. AST Six Pak f (loaded) 

Mm t 'o-ct or Boaro 384K . , 279 

28. AST Megaplua II 

M-t'u"C! on Boa-d 64K...270 

29. Quadram Quadboard 
M„'t*„-cto^ Board OK ...195 

30. Quadram Quadboard 

'// Boa'C 64<384K ..210/267 



Save 30% to 43% 
off Manufacturer Suyy es ted Ret prices on 

EPSON • Okttata • Star • 
• T0SHBA • COMREX 



EPSON 

LX 80 

RX 100+ 

FX 85 

FX 185 

_Q 1500 oarahel 

DX12 Daisy Wheel 10CPS . . .230 
DX?0 Daisy Wheel 20CPS . .CALL 
Convex II Comrter 269 



$215 
..350 
..340 
..475 
CALL 



STAR 

14. SG 10 

15. SD 10/15 . . . 

16. SR 1015 . . . 

OKI 

17. Ok 182 

18. Ok' '92/193 . 

19. Ok: 84 



.235 

.CALL 
.CALL 



.CALL 
.CALL 

CALL 




TOSHIBA 

2a Toshiba P341 . . 

21. Toshiba P351 . 

22. Toshiba P1340 . 



EPSON 



.CALL 
.CALL 
.CALL 



PRODUCTS FOR IBM-PC 



31. Orchid Tech. 

PC Turbo 186 570 

32. Paradise 

Modular Grapn cs Card . . . 290 

33. Hercules 

Monocnrome Card 329 

34. Hercules Color 

Coior Graph c Caro 170 

35. Novation 490605-1 
2400BPS nc M te Software . 620 

36. Novation 490603 

• 2 Card Modem 2400 BPS 

No so'tware 425 



37. Novation 490603-1 

As above x WS-DOS Software . .490 

38. Hayes 1200B 

Interna modem ^/software .359 

39. AT&T 4000 

300/' 200 Ext Modem 335 

40. Hayes 1200 

External modem 399 

41. Hayes 2400 

Externa: modem 599 

42. US Robotics Courier 2400 
Ext 2400B Smart Moderr . . . 460 

43. US Robotics Telpac 
Telecom m. Sotware 75 

44. TEACFD55B 

"2 ht DSDD Dsk Drve 90 



DISKETTES 



Dmn 



maxeH 



3M 



SONY 



Rr^tpIQ^B-X 



3V'2" SSOD 
DSOD 

5 V« " SSOD 
DSDO 

SSDD96TPI 

DSDD96TPI 
5V<" DSDDHD 

(Fw IBM AT) 

B" SSDO" 
8' DSDO" 



25.00 


25.00 


25.00 


3000 


37.00 


37.00 


1600 


14.00 


14.50 


2000 


1600 


1100 


24.00 


24.00 


24.00 


29.00 


29.00 


29.00 


35.00 


39.00 


40.00 


22.00 


29.00 


25.00 


26.00 


32.00 


29.00 



25.00 

37.00 
1300 
1500 



20.00 




24.00 




11.50 


1150 


12.50 


14.00 



24.00 



19.00 
20.00 



Call tor Quantity pricing for 10 boxes or mora. 



3M DATA CARTRIDGES 



85. DC100A $14.00 87. DC300XL $21.00 89. DC600A $2350 

66. DC300A 16.00 88. DC300XL/P 22.00 90. DC1000 15.00 

Call tor Quantity pricing for 10 cartridges or mora. 



CALL TOLL FREE 800-621-1269 EXCEPT Illinois, Alaska 



*^_ 655 7 N Lincoln A»r . Ch,c*jo II 60645 
|r|C. T 1 ?: 631 7800 ;31?] 677 7660 
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MS-DOS NEW PRODUCTS / edited by Mare-Anne Jarvela 



Lots of Ware 

For $79.95 you can order 
Try ware Volume 1. 16 pro- 
grams on 10 disks for the IBM 
PC/XT and compatibles (in- 
cluding the Models 1000 and 
1200). 

Volume 1 includes eight ap- 
plications (a word processor, 
spreadsheet, data base man- 
ager, communications soft- 
ware, file cataloging program, 
menu manager, file security 
program, and keyboard en- 
hancer), three utilities (disk 
file modification program, file 
directory manager, and a 
WordStar conversion pro- 
gram), and five games. 

Most of the programs are 
user supported, which means 
that you're expected to regis- 
ter for extra benefits (like free 
updates, expanded manual 
and telephone support) by 
sending an additional contri- 
bution of $5-$75 to the au- 
thor if you like the program. 

Each program includes 
documentation. For more in- 
formation, contact Briter Inc.. 
1 100 E. Hector St.. Conshoh- 
ocken. PA 19428. 215-828- 
3230. 
Circle 5 76 on Reader Service tnrd. 

Perfect Drawing 

Microdcx Corporation of- 
fers new versions of its 
xT.CAD ($449.95) computer- 
assisted drafting software for 
the Models 1000 and 1200. 
It's a general-purpose scaled 
technical drafting system for 
engineers, architects, and 
manufacturers, as well as an 
educational resource for 
schools and colleges. 

Single-stroke mnemonic 
keyboard input creates draw- 
ings immediately on the 
screen. XT.CAD includes 
overlay, zoom. pan. block 
copy/rotate, text label com- 
mands, and more. 

The program also offers 
several performance im- 
provements, including ex- 
panded scaling systems, 
easier numerical input op- 




Ten disks and 16 programs from Briter Inc. 



tions. and additional mes- 
sages. You need 256K. two 
disks, a graphics adapter (in- 
cluded on Model 1000). and an 
RS-232 interface for a plotter. 

Versions of xT.CAD are also 
available for the Models III 
and 4/4P. For more informa- 
tion, contact Microdex Corp.. 
1212 N. Sawtelle. Tucson, AZ 
85716.602-326-3502. 
Circle 575 on Reader Service card. 

Memory Plus 

A multifunction board from 
Matthew Electronics Inc. 
gives your Models 1000 and 
1200 access to a megabyte of 
memory, addressed as two 
banks of 512K bytes each. 

The board is available in 
two models. The $545 MEI- 
1000P includes a megabyte 
of RAM plus a selectable di- 
rect-memory access (DMA) 
controller, a clock, calendar, 
and port expansion interface. 
You can turn the DMA con- 



troller on or off with a switch 
on the board. The MEI-1000S 
($555) has a serial interface 
you can configure for an RS- 
232C port or an RS-422 port. 

You can get both boards 
with 512K of RAM ($385 and 
$395) and later upgrade them 
to a full megabyte. 

For more information, con- 
tact Matthew Electronics 
Inc.. 386 Avenida de la Ver- 
eda. Ojai. CA 93023, 805- 
646-7790. 
Circle 573 on Reader Service card. 

Better Accounts 

Dae Software Inc. has up- 
dated its Dac-Easy Account- 
ing software to accommodate 
both inventory and service- 
oriented businesses. The 
Model 1000/1200/2000 pack- 
age includes general ledger, 
accounts receivable, ac- 
counts payable, purchase or- 
der, inventory, billing, and 
forecasting programs. 



Dac-Easy's updated ver- 
sion also includes customized 
reports for purchase orders, 
invoices, and statements, 
and expanded codes for non- 
inventory items. The new 
price is $69.95. For more in- 
formation contact Dae Soft- 
ware Inc.. 4801 Spring Valley 
Road. Building 1 10-B. Dallas. 
TX 75244. 214-458-0038. 
Circle 570 on Reader Service card. 

Back It Up 

Fullback ($88 + $3 ship- 
ping) from Alps, a hard or 
floppy disk back-up system 
for the Models 1000. 1200. 
and 2000. automatically 
backs up files in one. several, 
or all subdirectories with a 
single command. Options on 
the command line let you 
back up modified files only, 
all files, and files by date or 
alphabetical range. 

If a directory is too large for 
a floppy disk. Fullback lets 
you selectively back up file 
groups across multiple flop- 
pies. If a file is too large for a 
floppy disk, you can back it 
up across multiple disks and 
later restore its original order. 
For more information, con- 
tact Alps. 1502 County Road 
25. Woodland Park. CO 
80863.303-687-1442. 
Circle 572 on Reader Service card. 

Interface Mania 

CMB3 Technologies' pro- 
gram for MS-DOS computers. 
The President, lets you ac- 
cess all capabilities of any 
printer through any applica- 
tion program or utility. 

The memory-resident pro- 
gram lets you select charac- 
ter style, pitch, or effect (like 
superscripts, subscripts, 
underlines, and so on) with 
any word processor. You can 
print wide, bold titles: change 
character width and style: 
and underline totals in any 
spreadsheet. 

The President ($99 plus 
shipping) comes with full 
documentation, demonstra- 
tions, and examples. For fur- 
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ELECTRONICS 



MODEL 4 



MODEL 6000 



MODEL 12 




256KMOD2000W/MONOMONITOR ... 1319.00 
256K MOD 2000W/COLOR MONITOR . . . 1629.00 

256K MOD 1200 HD1 DR 1499.00 

128K MOD 1000 W/MON0 1 DR 779.00 

128KMOD1000W/COLOR2DR 1119.00 

256K MOD 1000 W/10 MEG HD 1439.00 

24KMOD100PORT 469.00 

24KMOD200PORT 679.00 

64KMOD4D2DR 839.00 

512KMOD60002DR 3099.00 

512KMOD6000W/15MEG HD 3799.00 

15MEG HARDDISK 1329.00 

35MEG HARDDISK 2059.00 



CGP220PRINTER 499.00 

DMP105PRINTER 145.00 

DMP130 PRINTER 249.00 

DMP430 PRINTER 585.00 

DMP2100P PRINTER 1019.00 

DWP220PRINTER 429.00 

DWP510PRINTER 999.00 

TRACTOR DWP 220 99.00 

TRACTOR DWP 11/510 159.00 

TRACTOR FEED DMP2100P 99.00 

PARALLEL PRINTER SWITCH 96.00 

PARALLEL PRINTER CONTROLLER .... 179.00 
70MEG HARDDISK 2949.00 



NEW DMP2200 PRINTER 1 149.00 

100% RS COMPONENTS NO FOREIGN DRIVES OR MEMORY FULL WARRANTY 

ALL RS SOFTWARE 20% OFF CATALOG PRICE 

CASHIERS CHECK OR MONEY ORDER MUST ACCOMPANY ALL ORDERS 



(817) 825-4027 



NOCONA ELECTRONICS • box 593 • nocona, tx 76255 
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LOG 

SUPERLOG and 

SUPERLOG 4 



KSoft's Electronic Notebooks Free-format information manage- 
ment for the 90% of your information needs that won't fit into a 
data-base or spreadsheet 1024 characters per page. Lightning 
fast search and retrieval. Interrupt activated and accessible while 
another program is running 

A LOG or SUPERLOG Electronic Notebook is designed to replace 
your diary, address book, memo pad. card file, calendar, and 
scratch pad — so conveniently you will use it all day long CaH today 
for more information or immediate shipment. 



SUPERLOG 4 
SUPERLOG 3 
LOG 

LOG 



for Models 4 and 4P 
for I. III. 4 and 4P 
for Model I 
for Model III 



TPSD0S6 $119.95 

LDOS5.1 $119.95 

TRSDOS2.3 $ 49.95 

TPSDOS 1 .3 $ 49.95 



KSoft Inc. 

318 Lakeside Drive 
Brandon, MS 39042 



[601] 992-2239 CIS7O075.137 

MasterCard or Visa accepted 

Add $5.00 for shipping and handling 

Dealer mquries welcome 



(TRSOOS is a trademark or Tandy Corporation) 
(LOOS is a trademark of Logical Systems Inc ) 



MS-DOS NEW PRODUCTS 
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FULL SCREEN EDITOR 



EDITING THE HARD WAY? 

If you're still using Radio Shack (c) BASIC'S EDIT command, 
you might have a few words to say about it. We know we did. 
But we won't print them here. 

If you've looked at the fast editing features of GW-BASIC (c) 
on the newest Tandy and IBM micros, you're probably won- 
dering why your TRS-80 is still making you do things the 
hard way. Well, you don't have to any more. 
The SE83 Full Screen Editor gives you most of the editing fea- 
tures of GW-BASIC. And it's as simple as using a word pro- 
cessor Place your cursor anywhere on the screen to insert, 
delete, and modify characters, words, and whole lines of 
code. Duplicate lines just by changing the line number. De- 
bug faster— turn program lines into immediate commands, 
commands into program lines. 

The SE83 makes BASIC'S EDIT command a bad memory. 
Available for TRS-80 Models 1.2,3, 4/4P, and 12. It requires 
2 drives to install. It becomes part of your Radio Shack (c) 
BASIC. It's not copy or backup protected. And at a price of 
$24.95 and about 750 bytes of memory, it's not even expen- 
sive. 

THE SE23 FROM MICRO-LINK. Because we're better, you're 
faster. 

To Order Call Toll Free: 1-800-334-9612 in the U.S. 

l-800-»aa-8904 in South Carolina 



Micro-Link 

P.O. Box 2666 
Sumter. SC 29151 



$84.95 

Plus $5.00 shipping/ handling 

For COD add $3.00 

Shipped fast by UPS 2-day airmail 



Visa-MasterCard-COD 

Due to our low prices, all sales are final 




Run your business from a hard disk with Hardisk Ac- 
counting Series. 



ther details, contact CMB3 

Technologies. P.O. Box 3061, 

Walnut Creek. CA 94598. 

415-930-0470. 

Circle 574 on Reader Service card. 

Hard Disk 
Accounting 

Great Plains Software de- 
velops, manufactures, and 
sells the Hardisk Accounting 
Series for the Models 1000. 
1200. and 2000. 

The Accounting Series 
comprises general ledger, ac- 
counts receivable, accounts 
payable, payroll, inventory 
management with point of 
sale invoicing, and job cost 
programs. You can start with 
one program like General 
Ledger, then add others like 
Accounts Payable or Inven- 
tory as you need them. 

The Hardisk Accounting Se- 
ries is available in both single- 
($695 per module) and multi- 



user editions ($795 per mod- 
ule). You need 256K memory 
and a 5-megabyte hard disk. 
Contact Great Plains Software. 
1701 S.W. 38th St.. Fargo. ND 
58103.701-281-0550. 
Circle 577 on Reader Service card. 

Book Works 

Interactive Bibliography 
($99) for MS-DOS machines 
from SourceView Software 
International is a specialized 
data base management sys- 
tem for bibliographic refer- 
ence files. 

When you enter a reference 
in the bibliography data base, 
you identify up to 10 key 
words by which you can sort. 
In addition, you can sort an en- 
tire file by any field. 

For details, contact Source- 
View Software International. 
835 Castro St.. Martinez. CA 
94553.800-443-0100. 
Circle 571 on Reader Service card. 
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Circle 151 on Reader Service card 

CONVERT YOUR TRS-80 MODEL III OR 4 INTO A 

DEVELOPMENT SYSTEM 

Now you can develop Z-8fi based stand alone devices Mien db games. roOols, 
nblruMH-nts and peripheral controllers. Dy using your TRS-SGasadeveWpmeni sysiem 
The DFVElOPMATE plugs ■'• " conneclcx ul your TRS-80 and adds 

PROM PROGRAMMING tfM IN-CIRCUIT-EMULATIOM ipadlities to your 

Complete instructions and sample scnematics are included lo netp you design you' 
own simple standalone microcomputer tyttsms THESE SYSTEMS CAN BE AS 
SIMPLE AS FOUR iCs one TTL Circuit lor clock and reset, a Z-80. an EPROM. and 
one peripheral interlace chip 

When the In-CiTOUrt-CrnulMon cade n plugged 
nio [he 7. 80 socKetol your stand alone system, 
i oecomes a pal oi your TRS-80 You 
can use Ihe lull power o* you' edilc jssemple' s 
debug and trace programs to check out both the 
hardware ar<d ■■ ■ lest loops 

can be used to check outihe h.-. 
sysiem program can be run to debug the logic ol 
your stand alone device 

Since the program * kept >n TRS-80 RAM 
changes can be made quickly . i 
your standalone device worfcs as oc 
use the Devekjpmate s PROM PROGHAMMtF* 
to copy the program into a PROM . 
PROM, and a Z-80 >n place o< the emulation 
caple your stand aksne device wi" work Dy MmH 

The DEVELOPMATE is extremely compact Both the PROM programmer and the 
ln-CircuitEmulator are m one small plastic Don only 3 2-54 A line-plug mounted 
power supply is included The PHOM programmer n as a personality module which 
delmes the voltages and connections ol the PROrv" : - . -s can oe 

accommodated However the system come ' . -noduiu 

whicr- handles 2758.2S06<aKj 2716.2516(1^- is well as the new eiec 

tncaily alterable 28 16 and 480 1 6( 1 6K EEPROMsi 

The COMPLETE DEVELOPMATE 83 with software, power supply, emulation 
cable. TRS-80 cable, and "universal" personality module, is ONLY S329! 




PM2 PERSONALITY MODULE lor 2732A EPROM 
PM3 PERSONALITY MODULE lor 2764 EPROM 

ORION INSTRUMENTS 

702 Marshall Street #614 

Redwood City, CA 94064 

415-361-8883 

MasterCard and Visa phone orders accepted. 

California residents please add sales tax. 

Circle 300 on Reader Service card. 
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mi mflRYmflC industries inc. 

800-231-3680 

Radio Shack Tandy 

EPSON PRINTERS 

People you Trust to give you the very best! 




/^/'■'■•'■r\m\ 





r--~~ =*, 



• Lowest 
Discount 
Prices 

• Reliable 
Service 

• Quality 
Products 



"Worlds Largest Independent 
Authorized Computer Dealer" 

22511 Katy Fwy., Katy (Houston) Texas 77450 
(713) 392-0747 Telex 774132 





The 

Bi-Tech 

Star 
Network 



ylble to link 8 computers to a 
Hard Drii/e System 



includes 2 Host Adaptors 



SPECIAL with any purchase of 
Bi-Tech MULTIPLEXER SYSTEM. 
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BASIC TAKES / by Richard Ramella 



Zl 



They Went Thataway : Controlling 
Program Flow With If. . .Then Tests 



If the payroll wagon arrives by noon, 
we'll stick up the mine office at 12:30. 
when the guards go eat." a burly bandit 
told his gang of B-western heavies on my 
TV the other night. 

"But boss, what if the wagon's late?" 
asked one of the less dim-witted ones. 

"Then we'll get some vittles. too, and 
pull the holdup at 1 :30. If the wagon ain't 
here by then, we'll wait in the shade." 

Mutters of approval. Break for a com- 
mercial. 

I was charmed by this exchange, for it 
was a perfect example of an If. . .Then 
proposition in Basic. You could write a 
simple Basic listing to simulate the 
events of the gang's plan. 

The Decision-Maker 

In Basic, you use If. . .Then tests to 
trigger new events if current events ful- 
fill stated conditions. This test opens 
nearly infinite possibilities: If a specified 
Basic event occurs, then you can do any- 
thing else of which Basic is capable. And 
I mean anything! 

Let's start small: 

100 CLEAR: CLS 
1 10 FOR X = 1 to 10 

120 PRINT X 

130 IF X = 5 THEN END 

140 NEXT X 

150 END 

The key to this program lies in line 
130. If X has attained a value of 5. then 
the program ends. You could change line 
130 to anything else in Basic: 

IF X = 1 THEN A$ = "ITS 1 P.M.; IF X = 3 

THEN Y = 2; 

IF X> 1 THEN GOSUB 1000 

IF X <> 5 THEN PRINT "X IS NOT EQUAL TO 

5" 

IF X = Y THEN A$ = A$ + STR$(Y) 

The If statement tests any Basic event, 
and the Then statement fosters any Ba- 
sic event: 



System Requirements 

Models I. m, 4. 100. lOOO, 1200. 

and 2000 

Basic 




IF A$« "APPLESAUCE" THEN PRINT "I 

WANTED ICE CREAM." 

IF Z$ • T THEN MERGE "CUSTER/BAS" 

IF L- 1 THEN PRINT Til SORRY. THAT IS 

WRONG." 

IF INKEYS <>••• THEN PRINT ' ' HEY. I TOLD 

YOU NOT TO TOUCH THAT KEYBOARD!" 

You should realize that when program 
values fulfill an If test, everything re- 
quested past the Then will happen. 
Should conditions not meet the test. Basic 
ignores the Then events. This exemplifies 
a common If. . .Then programming mis- 
take: making essential program code de- 
pendent on the If test. Here's an example: 

100 CLEAR: CLS 

1 10 FOR X - 1 TO 5 

120 PRINT X 

130 IF X >3 THEN PRINT X"IS MORE THAN 

3": NEXT X 

140 END 

The intent of this program is to go 
through a For. . .Next loop from 1 to 5. 
each time printing the value of X and 
noting when the value exceeds 3. It 
won't work because the NEXT X hap- 
pens only if X is more than 3. and the 
incorrect If. . .Then test thwarts that 
possibility. To fix it. remove the NEXT X 
from the end of line 1 30 and give it its 
own line: 135 NEXT X. 

Any time you get crazy results with an 
If. . .Then test, check whether you've in- 



cluded some event fundamental to pro- 
gram flow in the realm of Then events. 
And remember that everything past the 
Then statement occurs only when pro- 
gram conditions meet the If test. 

Multiple Events 

So far, I've covered one-element If 
tests. An If test can also stipulate multi- 
ple events, all of which must be met for 
the program to execute the event: 

IF X - 1 AND Y = 2 AND B$ = "ZINGER" THEN 
PRINT "YOU WIN": END 

An If test can trigger a Then result if a 
program meets either of two or any of 
many tests: 

IF X = 1 OR Y < = 30 OR G$ = "GOLLY" THEN 
PRINT "TEST MET." 

You can combine these two forms: 

IF X = 1 AND Y = 2 OR Z = 3 THEN PRINT "OK" 

In this example. Basic prints "OK" if 
Z equals 3. It also prints "OK" if X equals 
1 and Y equals 2. Consider another form 
of the If. . Then test: 

IF X - 1 OR Y - 2 AND Z * 3 THEN PRINT "OK" 

In this example. Basic prints "OK" if X 
equals 1 or if Y equals 2 and Z equals 3. 
To understand these concepts better, 
think of the Or statement as a wall be- 
tween possibilities, and the And state- 
ment as a bridge. 
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Program Listing 1 . Factors. 

100 REM * FACTORS 

110 CLEAR: CLS 

120 FOR X-l TO 25 

130 PRINT "Factors of "X 

140 FOR Y-l TO X 

150 IF X/Y-INT(X/Y) THEN PRINT Y» 

160 NEXT Yt PRINT 

170 PRINT "TAP A KEY TO CONTINUE" 

180 X$-INIEYS 

190 IF X$-"" THEN 180 

200 CLS i NEXT Xi END 

220 CLEARt CLS 

End 



Program Listing 2. Heads-Tails. 

100 REM * Heads-Tails 

110 CLEARt CLS 

120 A-RND(2) 

130 IF A-l THEN H-H+l j GOTO 120 

140 IF H>S THEN S-H: PRINT S 

150 H-0t GOTO 120 

160 END 

End 



You can put a series of If. . .Then tests 
on one program line. Any time the pro- 
grams fails to meet a test, it falls through 
to the next line for further instructions. 
As long as a program meets conditions 
of the tests, it gives Then results and 
makes subsequent If tests. 

Here's an example: 

IF X- 1 THEN PRINT •YES": IF Y- 1 THEN 
PRINT SI": IF Z - 1 THEN PRINT "JA" 

The program won't test for Z unless X 
and Y both equal 1. It won't test for Y 
unless X is 1 . And nothing happens if X 
doesn't equal 1. You'll find cases in 
which it's useful to isolate fall-through 
tests such as these on the same line. 

Putting If. . .Then to Work 

One of the best uses of an If. . .Then 
test is in working with factors, numbers 
evenly divisible into larger ones. Pro- 
gram Listing 1, Factors, uses If. . .Then 
to test and print factors for the numbers 
1-25. The crucial test occurs in line 1 50. 
In another If. . .Then test, line 190 keeps 
the current results on-screen until you 
tap any key to continue. 

Factors represents an example of let- 
ting a computer do the drudge work 
while you relax. You could amend it to 
print out the factors for the numbers 
from 1 to as high as the computer ac- 
cepts. And I hope it suggests some pos- 
sibilities for problem-solving and 
answer-finding using programs that au- 
tomatically seek, sift. save, compare, 
contrast, and so on. 

Program Listing 2. Heads-Tails, uses 
two If. . .Then tests. Line 120 simulates 
the flip of a coin. In line 130. if A equals 
1. the program accepts it as heads and 
increments the heads total (variable H) 
by 1. 1 wrote this line to accept only con- 



Program Listing 3. Alphabytes. 




100 REM * Alphabytes • 




110 CLEARt CLS 




120 FOR X-l TO 2 




130 INPUT "Type a word and press Enter "|A$(X) 




140 NEXT X 




150 IF A$(1)<A$(2) THEN PRINT AS(1); ELSE PRINT AS (2); 




170 PRINT " is alphabetically first" 




180 END 









secutlve occurrences of heads. If you get a 
tail, line 140 tests whether you set a rec- 
ord for a consecutive run of heads and. if 
so. assigns a new high score to variable S. 
When you run this program, it's unlikely 
you'll get more than seven or eight 
straight occurrences of heads, unless you 
let the program run a long time. 

A Matter of Relations 

I was amazed when I realized that pro- 
grammers write most If. . .Then tests 
with just a few relational operators. 
They are equal to ( = ). less than ( < ). and 
greater than ( > ). In combining these wc 
come up with not equal to ( <> or ><). 
less than or equal to ( - < or < *). and 
more than or equal to ( > = or = > ). 

You can use these symbols to test 
numbers and strings. You probably have 
a good command of number tests, but 
consider how you can use string tests. 



An alphabetical sort program works by 
comparing the ASCII values of character 
strings. Try Program Listing 3. Alpha- 
bytes. (A true sort program is more com- 
plex than Alphabytes: it passes through 
a list of words many times, swapping 
values until the list is in order.) 

An If. . .Then test that also includes 
the Basic command Else gives you a way 
for either of two Then events to occur— 
one when the program meets the If test, 
the other when it doesn't: 

IF X- 1 THEN PRINT "YES" ELSE PRINT 
"NO" 

You can also obtain multiple Else results: 

IF X- 1 THEN PRINT 'ONE" ELSE IF X-2 
THEN PRINT "TWO" ELSE IF X - 3 THEN 
PRINT "THREE" ■ 



Write to Richard Ramella at 1493 Mt. 
View Ave.. Chlco, CA 95926. 
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THE NEXT STEP / by Hardin Brothers 



Putting the Squeeze 
On Model 4 Programs 



Many books and articles have 
spread the common misconcep- 
tion that Basic is a purely interpretive 
language. According to this point of 
view, Basic interprets program code as it 
executes each line. 

Basic is indeed interpretive, but what it 
interprets while it executes a program or 
a direct command looks nothing like the 
code you write. As you type in each line of 
a program, Basic transforms it and, in a 
sense, precompiles it so that the computer 
can execute the line more quickly. 

If you use Model I (Level II) or Model III 
Basic, either cassette- or disk-based, the 
computer translates the key words in 
each line into one of 1 28 possible tokens 
as soon as you press the enter key. This 
tokenizing scheme lets Basic execute a 
program relatively quickly because it al- 
ready knows the commands in each line 
and doesn't have to look each one up in 
a table. Model I/III Basic represents each 
token within Basic as a single value be- 
tween 80 and OFF hexadecimal (hex). 

Model 4 Basic uses more than 128 key 
words, and therefore needs to extend 
this translation scheme somewhat. 
Pages A-82 and A-83 in the TRSDOS 6.2 
manual show all the key words in Model 
4 Basic and the tokens, or internal codes, 
for each. Basic internally represents 
those tokens with values above 65000 as 
a byte of OFF hex, which signals an ex- 
tended-code key word, plus another byte 
specific to that key word or command. 

You never notice the time Basic takes 
to translate the line you type into an in- 
ternal, tokenized line of code because 
you type slowly by a computer's stan- 
dards. When you do notice a pause after 
entering or editing a line, it's not be- 
cause of interpretation but because Ba- 
sic moves around program lines in mem- 
ory. However, if Basic had to decipher 



System Requirements 

Model 4 

Disk Basic 1.0 1.00 

Assembly language 

Editor/assembler 




— sift**-?. _ ■ ,_.. 



each command in each program line 
during execution, your programs would 
run much more slowly than they do. 

Basic Differences 

Model I/III Basic translates each key 
word into a token and leaves the rest of 
the program line unchanged. Basic's ex- 
ecution, or run-time, module must then 
do the rest of the necessary interpreta- 
tions every time it executes each line. 

Model 4 Basic operates differently. Not 
only does it translate all key words into 
tokens when you enter a line, it also 
translates all numeric values into Ba- 
sic's internal format. Model I/III Basic 
recognizes four types of numbers: line 
numbers (zero to 65529). integers 
( - 32768 to 32767). and single- and dou- 
ble-precision floating-point numbers. 
However. Basic holds all numbers in 
their literal. ASCII format inside pro- 
gram lines and translates them into an 
internal form during execution. 

Model 4 Basic changes all numbers to 
an internal format at the same time it 
tokenizes each line; that is. when you en- 
ter the line. It recognizes nine types of 
numbers and uses a separate internal 
form for each. Except for one-character 
values (zero to nine) and numbers in 
data statements. Model 4 Basic adds a 
prefix to each numeric value to show 
what type of number it is (see the Table). 



Model 4 programs seem to list more 
slowly than their Model III counterparts 
partly because Basic must translate all 
numbers from their internal representa- 
tions back to their external ASCII form. 

Because Model 4 Basic translates 
numbers into and out of internal format. 
a line sometimes appears to have 
changed after you enter it. For example, 
the line: 

10A«&H000F:B-12.0 
will list as: 

10A-&HF.B=12! 

Basic hasn't changed either value, but 
the ASCII representation of each is dif- 
ferent. The exclamation point at the end 
of the line shows that Basic interprets 
that 12 as a single-precision floating- 
point number rather than as an integer. 

Model I/III Basic recognizes only the 
first two characters of a variable name 
as significant. Model 4 Basic recognizes 
the first 40 characters of the name as sig- 
nificant so that, for example, it sees 
PRICE and PROFIT as different vari- 
ables. It also lets you include key words 
in variable names. A variable named 
FORM would be impossible in Model I/III 
Basic since it contains the key words 
FOR and OR: it is perfectly acceptable in 
Model 4 Basic. 

To distinguish between true key words 
and key words accidentally included in 
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BUSINESS PAC 100 

100 Ready-To-Run 
Business Program! 

(ON CASSETTE OR DISKETTE) Includes 128 Page Users Manual..... 

Inventory Control Payroll Bookkeeping System Stock Calculations.. 

Checkbook Maintenance Accounts Receivable Accounts Payable 




BUSINESS PAC 100 PROGRAM LIST 

NAME DESCRIPTION 

1 RC1LE78 Interest Apportionment by Rule of the 78 s 

2 ANNO 1 Annuity computation program 

3 DATE Time between dates 

4 DAYYEAR Day of year a particular date falls on 

5 LEASEJNT Interest rate on lease 

6 FJREAKEVH Breakeven analysts 

7 DEPRSL Straightlme depreciation 

8 DEPRSY Sum of the digits depreciation 

9 DEPRDB Declining balance depreciation 

10 DEPRDDB Double declining balance deprecation 

1 1 TAXDEP Cash flow vs. depreciation tables 

1 2 CHECK2 Prints RAPIDFORMS checks along with daily register 

13 CHECKBK1 Checkbook maintenance program 

14 MORTGAGE A Mortgage amortization table 

1 5 MULTMOM Computes time needed for money to double, tnple. etc 

16 SALVAGE Determines salvage value of an investment 

1 7 RRVARJN Rate of return on Investment with variable inflows 

1 8 RRCOMST Rate of return on investment with constant inflows 

1 9 EFFECT Effective interest rate of a loan 

20 FVAL Future value of an investment (compound interest) 

2 1 PVAL Present value of a future amount 

22 LOAMPAY Amount of payment on a loan 

23 REGWTTH Equal withdrawals from investment to leave over 

24 SIMPDISK Simple discount analysis 

25 DATEVAL Equivalent & nonequivalent dated values for oblig 

26 AMNCJDEF Present value of deferred annuities 

27 MARKUP % Markup analysis for Items 

28 SINKFCJND Sinking fund amortization program 

29 FJONDVAL Value of a bond 

30 DEPLETE Depletion analysis 

31 BLACKSH Black Scholes options analysis 

32 STOCVAL I Expected return on stock via discounts dividends 

33 WARVAL Value of a warrant 

34 BONDVAL2 Value of a bond 

35 EPSEST Estimate of future earnings per share for company 

36 BETAALPH Computes alpha and beta variables for stock 

37 SHARPE1 Portfolio selection model -i.e. what stocks to hold 

38 OPTWRfTE Option writing computations 

39 RTVAL Value of a right 

40 EXPVAL Expected value analysis 

4 1 BAYES Bayesian decisions 

42 VALPRINF Value of perfect information 

43 VALADirSF Value of additional information 

44 UTILITY Derives utility function 

45 SIMPLEX Linear programming solution by simplex method 

46 TRANS Transportation method for linear programming 

47 EOQ Economic order quantity inventory model 

48 QUEUE! Single server queueing (waiting line) model 

49 OrP Cost-volume-profH analysis 

50 CONDPROF Conditional profit tables 

51 OPTLOSS Opportunity loss tables 

52 FQUOO Fixed quantity economic order quantity model 

53 FQEOWSH As above but with shortages permitted 

54 FQEOQPB As above but with quantity price breaks 

55 QUEUECB Cost -benefit waiting line analysis 

56 NCFANAL Net cash -flow analysis for simple investment 
^7 PR0F1ND Profitability index oi a project 

58 CAPI Cap Asset Pr Model analysis of project 



59 WACC Weighted average cost of capital 

60 COMPBAL True rate on loan with compensating bal required 

61 DISC BAL True rate on discounted loan 

62 MERGANAL Merger analysis computations 

63 FIN RAT Financial ratios for a firm 

64 NPV Net present value of project 

65 PRJNDLAS Laspeyres price index 

66 PRJNDPA Paasche price index 

67 SEASIND Constructs seasonal quantity indices for company 

68 TIMETR Time series analysis linear trend 

69 TTMEMOV Time series analysis moving average trend 

70 FUPRINF Future price estimation with inflation 

71 MAILPAC Mailing list system 

72 LETWRT Letter writing system links with MAILPAC 

73 SORT3 Sorts list of names 

74 LABEL 1 Shipping label maker 

75 LABEL2 Name label maker 

76 BUSBUD DOME business bookkeeping system 

77 T1MECLCK Computes weeks total hours from tjmeclock info 

78 ACCTPAY In memory accounts payable system-storage permitted 

79 INVOICE Generate invoice on screen and print on pnnter 

80 INVENT2 In memory inventory control system 

8 1 TELDIR Computerized telephone directory 

82 TTMUSAN Time use analysis 

83 ASSIGN Use of assignment algorithm for optimal job assign 

84 ACCTREC In memory accounts receivable system-storage ok 

85 TERMSPAY Compares 3 methods of repayment of loans 

86 PAYNET Computes gross pay required for given net 

87 SELLPR Computes selling price for given after tax amount 

88 ARBCOMP Arbitrage computations 

89 DEPRSF Smiting fund depreciation 

90 UPSZONE Finds UPS zones from zip code 

91 ENVELOPE Types envelope including return address 

92 AUTOEXP Automobile expense analysis 

93 INSF1LE Insurance policy file 

94 PAYROLL2 In memory payroll system 

95 DILANAL Dilution analysis 

96 LOANAFFD Loan amount a borrower can afford 

97 RENTPRCH Purchase price for rental property 

98 SALELEAS Sale leaseback analysis 

99 RRCONVBD Investor's rate of return on convertible bond 

1 00 PORTVAL9 Stock market portfolio storage-valuation program 

□ TRS-80 Cassette Version S 99.95 

Z TRS-80 (Mod l/lll/4/Color) Commodore. Apple or Atari Versions S 99.95 
G IBM. TRS-80 (Mod 11/12/16). Kaypro. and CP/M Versions S149.9S 
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Token 

OA hex 
OB hex 
OChex 
OD hex 
OE hex 
OF hex 

10 hex 

11 hex 

12 hex 



19 hex 
lAhex 
1 B hex 



Meaning 

(Line feed) 
Octal number 
Hex number 
(Carriage return) 
Line number 
Single byte (10-255) 
(Apparently unused) 
Single digit numbers 



Internal Form ASCII Example 



OB nn nn 
OC nn nn 

OE nn nn 
OF nn 

11 
12 



19 
1A 



$01234 
&H1234 

GOTO 1234 
123 



1 



Apparently unused) 
IChex 2-byte integer 1C nn nn 1234 

ID hex 4-byte single-precision floating lDnnnnnnnn 1234.5 

point 
IE hex (Apparently unused) 
IF hex 8-byte double-precision float- IF nn nn nn nn 1234.5# 

ing point nn nn nn nn 

20 hex (ASCII space) 

Negative numbers use the same representation but are prefixed with the token 
for a minus sign. 0F4 hex. 
Numbers in Data statements are stored unchanged in their original ASCII format. 

Table. Model 4 Basic's internal representation of numeric values. 



Program Listing. Squeeze filter. 



08108 
08118 
00120 
00130 
00140 
00150 
80160 
00170 
00180 
00190 
00208 
80210 
00220 
00230 
00240 
08258 
88260 
88278 
88280 
00290 
00300 
00310 
00320 
00330 
00340 
00350 
00368 
80378 
00380 
00390 
00408 
80410 
00420 
00430 
00440 
00450 
08468 
88478 
08488 
80490 
00500 
00510 
00528 
00530 
00540 
00550 
08568 
80570 



Utility to SQUEEZE all unneeded spaces from 
a BASIC program in memory. Also removes 
remarks and linefeed characters. Does not 
alter literal strings. 



For BASIC 01.01.00 onlyl 
Tested with TRSDOS 6.2 



(see text) 



SVCs used: 

PDSPLY EQU BAH 

8CHNI0 EQU 14H 

GEXIT EQU 16H 

9GTM0D ECU 53H 

gHEXDEC EQU 61H 

§HIGH$ EQU 64H 

0FLAGS EQU 65H 

Other constants (see text] 



PRG_TBL 
VAR_TBL 
ARR_TBL 
FRE_SPC 

OCT 

HEX 

LINE 

BYTE 

INTEGER 

SINGLE 

DOUBLE 

LF 

CR 

SPACE 

REMARK 

EXTEND 

SIGNAL 



EQU 
EQU 
EQU 

EQU 

EQU 
ECU 
EQU 
EQU 
EQU 
EQU 
ECU 

EQU 

EQU 
EQU 
EQU 
EQU 

EQU 



71A5H 
719FH 
71A1H 
71A3H 

0BH 
0CH 
0£H 
IFB 

1CH 
1DH 
1FH 

8AH 
0DH 
20H 
8FH 
0FFH 

0F3H 



Macro instructions 

: MACRO »NUM 

LD A.JNUM 

RST 28H 
ENDM 



;■■> Basic's program table 

;«■> variable table 

;«> array table 

;■•> free space 

;0ctal number token 
;Hex number token 
;Line number token 
;Byte value token 
; Integer value token 
jSingle-prec. value token 
; Double-prec . value token 

;Linefeed character 

,-Carriage return character 

;Space character 

;REM token 

; Extended command token 

;<clear><Shift><S> 



;This is pre-defined in ALDS 



lusting continued 



variable names. Model 4 Basic requires 
that you separate each key word and var- 
iable with some type of delimiter. You can 
use any character not allowed in a varia- 
ble name— including a space, a comma, 
a parenthesis, an equals sign, and the 
math and relational operators — as a de- 
limiter. The result is that Model 4 Basic 
programs tend to contain many more 
spaces than Model III programs. 

I almost always use extra spaces, tabs, 
line feeds, and comments when I write a 
program to make debugging easier. 
However. Basic stores each of these char- 
acters according to its internal represen- 
tation, making programs longer than 
needed both in memory and on disk. 
Some long programs begin to run out of 
memory space in the Model 4. One solu- 
tion for that is a utility that condenses a 
debugged program into the least possi- 
ble space to allow as much room as pos- 
sible in memory when you run the 
program. Squeeze is such a program; it 
removes all spaces, all line feeds, and the 
text of all remarks (see the Program List- 
ing). It does not. however, affect literal 
strings in your program. 

The Big Squeeze 

To use Squeeze, you must first install 
it with the Set command at TRSDOS 
Ready and use the Filter command to 
link it to the keyboard driver. If you as- 
semble the program as Squeeze/FLT. 
you would install it with the following 
two lines: 

SET *SQ SQUEEZE 
FILTER *KI »SQ 

The program will report that it has 
successfully installed itself and then re- 
locate itself to protected high memory. 
You invoke it by pressing clear/shift-S 
when you want to compress a Basic pro- 
gram in memory. 

Squeeze displays each line number as 
it compresses your program. If these 
numbers are out of order, something has 
gone wrong and you should reload your 
Basic program from disk before trying 
again. If the numbers are in order. 
Squeeze has successfully compressed 
the program. 

If you list a compressed program, you 
might be surprised to sec that it appar- 
ently still contains some spaces. The in- 
ternal representation of the program 
won't have any. but Basic's listing mod- 
ule will put spaces wherever necessary 
in the version it shows you. What you 
see is the minimum number of spaces 
you could use to enter the program. 

Also. Squeeze removes the text of all 
remarks, but keeps the Remark state- 
ments in case you have a GOTO or GO- 
SUB to a line that begins with a remark. 
Any remark that originally began with 
an apostrophe will be shown as REM. 
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Circle 383 on Reader Service card 



LETTER -WRITER" 

"Integrated WORD PROCESSING Power" 



Circle 357 on Reader Service card 




THE "BEST" SOPTWARE IS GUARANTEED! 
TRY IT and LIKE IT, or GET a REFUND 

The machine code disk L-W is "A" rated by 
AUenbach's "SOFTWARE REPORTS" for: 

EASY USE, DOCUMENTATION. FEATURES 

- FORM LETTERS and LABELS on any printer. 

- ADD and SUB bookkeeping and tax columns. 

- LEGAL PAPER LINE NUMBERING. Centering. 

- Copy, move, delete, insert, merge, select. 

- Screen display same as printout, unmodified 
Ml users can see and print up/lower case. 

•MASS MAILER, graphics, cancel changes. 

-SPLIT SCREEN typing line, see old and 
new versions, word wrap, disk warm start. 

•Over 50 "one key" INSERTION PHRASES. 

- ONE MODE: Type / Edit / Delete without 
switching modes- NO TRAINING PERIOD. 



WE PAY TAX and USA SHIPPING. Try your 

L-W for 3 months. Like It or return it for 

a refund, less our shipping costs of: $3.50. 

- Basic 16K TAPE system: $ 27.99 

• Extra Feature 32K DISK: $ 47.99 

Versions: MI. Mill, MIV 
Specials: The BUGS Game 
Tape $ 9.95, Disk $ 11.95 



ASTRO-STAR ENTERPRISES 
5905 Stone Hill Dr. Information/orders: 
Rocklin. CA 95677 (916) 624-3709 

Orders: 1-800-622-4070 ^ T 
in IL 1-800-942-7317 ^" ^^ 



Circle 295 on Reader Service card 



C' I b N T r R V R 1 s h 

COMPUTfl^lSKETTES 




DSDD 
s 99 



SS/DD 
s 90 



LIFETIME GUARANTEE 

Individually Tested '00- Error Tree 
Remlorced KuO Rings Wnle Prolecl labs 
Coic ID Labels and Tyvet En.. 

Add $3 CO snippmg per '00 or lew*' diskettes 
WA Resident* add 8* sales la- 

■ 

• & Money 

GT ENTERPRISES 

2400-SW 325th Street. Federal Way, WA 08023 

To Order. Phone Our 24 Hour Toll Free Line 

1 (800) 028-2828. A»K For ExL 525 

Specific Questions and Inquiries 

(206)838-5107 



n p 



- i .'..'.•-'.■ ; '...-- . 



Maclnker Mercury 

mm man aw 



Re-Ink Any Fabric Ribbon 
Automatically for 
Less Than CJ(£ 

Now one Universal Cartridge 
Maclnker (UC) re-inks all fabric car- 
tridges and one Universal Spool 
Maclnker (US) re-inks all spools. We 
support over 1000 printer brands. 

Most dedicated Mac Inkers) cost less 
than $60 and start at $54.95. The 
Universal Cartridge Maclnker is 
$68.50. The Universal Spool 
Maclnker is $66.95. 

Use your Mac Inker to re-ink your 
dry cartridges (for less than 5 cents 
in ink) and watch the improvement 
in print-out quality. Our residueless, 
lubricated, dot matrix ink yields a 
darker print than most new ribbons. 
Or get any of our six basic ink colors: 
Brown, Blue, Red Green, Yellow, 
Purple and use Mac Inker to create or 
re -ink your own colored cartridges. 
We have uninked or pre-colored car- 
tridges. 

Most cartridges can be used almost 
indefinitely, if ribbon is regularly re- 
inked, kept moist and lubricated, so 
that the fabric does not fray. Some 
customers have reported 80 re-inkings 
of the same cartridge and still getting 
excellent print. 

As of October '85 we have more than 
45,000 Mac Inker (s) in the field, in 
five continents (220V motors 
available). Mac Inker has been 
reviewed, approved and flattered in 
most magazines and even in the New 
York Times and the Chicago Sun 
Times. 




Universal Cartridge Mac Inker 



From the God oi 
Communications a 
Divine Modem at a 
Miracle Price. 



• 100% Hayes Smart modem' Com- 
patible; that is, Mercury runs with all 
the popular and just about any private 
or public domain communications soft- 
ware. 

• 300/1200 Baud Speed, software or 
hardware (dip switch) selectable. The 
1200 Baud features will save you a 
bundle in long-distance connections. 

• Auto Dial/Auto Answer/Speed 
Selection 

• Audio Monitor via speaker with 
/olume control 

• Front Panel Lights give you at a 
glance full information on the status 
and mode of your communication: 
modem ready — terminal ready — 
carrier detect — send data — receive 
data — high speed — auto answer — 
off hook. 

• Clear and Easy-to-Read Manual. If 
modeming is new for you, the Mer- 
cury manual will ease your way into 
the exciting and rewarding world of 
data transmission. 

• 18-Month Warranty 



$265.00 



Including power supply, telephone 
cable and manual. Computer to 
modem cable ($15) — shipping $4 
anywhere in continental U.S. 

'Hayes is a Trademark ol Hayes Mlcioproducts. 




CSSmputer 
Friends 



Dealer Inquiries Welcome 



Order toll free 1-800-547-3303 

or ask for free brochure 

In Oregon and for 24-hour service 

(503)297-2321. 

Computer Friends 

6415 SW Canyon Ct., #10 

Portland, OR 97221 
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Listing continued 








00580 ; 








00590 STORE 


MACRO 




;Saves contents of DE in (HL) 


00600 


LD 


(HL),E 




00610 


INC 


HL 




00621 


LD 


(HL),D 




00630 


ENDM 






00640 ; 








00660 ; Memory-resident code 


00680 ; 








00690 


ORG 


3000H 


;Use PSECT 3000H with ALDS 


00700 | 








00710 ; Filter header: 




00720 i 








00730 BEGIN 


JR 


START 


;Jump over header 


00740 OLDHI 


DKFW 


5-S 


;2-bytes for old HIGHS 


00750 


DEFB 


MODDCB-BEGIN-5 


;Length of module name 


00760 


DEFM 


•SQUEEZE' 


;Module name 


0077 MODDCB 


DEFW 


s-s 


(2-bytes for DCB address 


00780 


DEFW 





;Reserved by TRSDOS 


00790 ; 








00800 ; Storaqe area 






00810 ; 








00820 NUMBUF 


DEFS 


5 


;5 spaces for ascii numbers 


00830 


DEFB 


0DH 


;End with carriage return 


00840 BASMSG 


DEFM 


'BASIC is not 


loaded 1 ' 


00850 


DEFB 


0DH 




00860 ERROR 


DEFM 


'Program pointer error' 


00870 


DEFB 


0DH 




00880 ; 








00890 ; Basic Signat 


lire at 3000H-. 




00900 i 








00910 SIGNAT 


DEFB 


0E4H,0E2H,27H > 


0F1H,0ECH,00H,2EH,0F1H 


00920 






;Use separate DEFB statements 


00930 






;For assemblers other than edas 


00940 ; 








00950 ; Link 


to *KI 


dr iver : 




00960 ; 








00970 CHAIN 


PUSH 


IX 


; Save old value 


00980 


LD 


IX, (MODDCB) 


;Get our DCB address 


00990 RELl 


ECU 


S-2 




01000 


SVC 


eawio 


;Move down chain 


01010 


POP 


IX 


; Recover old value 


01020 


RET 






01030 ; 








01040 ; Star 


t of filter code: 




01050 ; 








01060 START 


JR 


NC, CHAIN 


;Go if not GET request 


01070 


CALL 


CHAIN 


;Else go and return 


01080 REL2 


EQU 


$-2 




01090 


RET 


NZ 


;Return if no key 


01100 


PUSH 


AF 


;Else save char t flags 


01110 


CP 


SIGNAL 


;Our turn? 


01120 


JR 


Z,GO 


;Yes — start our routine 


01130 


POP 


AF 


;Else recover flags 


01140 


RET 




;And leave 


01150 ; 








01160 j Our 


routine 


has been invoked: 


■1170 ; 








01180 GO 


PUSH 


BC 


;Save all registers 


01190 


PUSH 


DE 




01200 


PUSH 


HL 




01210 


PUSH 


IX 




01220 


PUSH 


IY 




01230 ; 








01240 


LD 


HL.3000H 


;HL=»> beginning of program area 


01250 


LD 


DE, SIGNAT 


;DL"> signature comparison table 


•1260 REL3 


EQU 


$-2 




01270 


LD 


B,8 


; Bytes to check 


01280 CKLOOP 


LD 


A, (DE) 


;Get signature byte 


01290 


CP 


(HL) 


;Okay? 


01300 


JR 


NZ , NOBAS 


;Go if not 


01310 


INC 


BL 


;Else bump pointers 


01320 


INC 


DE 




01330 


DJNZ 


CKLOOP 


; Check 8 bytes 


01340 


JR 


OKAY 


jAnd go 


01350 ; 








01360 ; Basi 


c is not resident 




01370 ; 








01380 NOBAS 


LD 


HL, BASMSG 


;Point to message 


01390 REL4 


EQU 


$-2 




01400 


DEFB 


0DDH 


;LD IX prefix 


01410 INTERR 


LD 


HL, ERROR 


;Point to message 


01420 REL5 


EQU 


S-2 




01430 


SVC 


GDSPLY 


.•Display it 


01440 


JP 


OUT 


;And leave 


01450 REL6 


EQU 


S-2 




01460 ; 








01470 ; Basic is in 


memory — start squeeze 


01480 ; 








01490 OKAY 


LD 


IX, (PRG_TBL) 


;IX««> User program 


01500 


LD 


IY, (PRG_TBL) 


;IY-»> User program 


01510 


CALL 


BUMPl 


;Move byte from (IX) to (IY) 


01520 REL7 


EQU 


S-2 




01530 


OK 


A 


;Was it 00 line separator? 


01540 


JR 


NZ, INTERR 


;No — Report error i stop 


01550 ; 






Listing continued 



which looks like a mistake but isn't. Ba- 
sic normally stores an apostrophe used 
as a Remark command as 3 bytes: a co- 
lon to indicate a new command, a re- 
mark token, and a special token for the 
apostrophe itself. The compression util- 
ity removes the apostrophe token and all 
the text that follows the remark symbol, 
but leaves the colon and first remark to- 
ken in place so that the program runs 
without error. 

If you save a compressed program to 
disk in normal, tokenized form, it won't 
have any spaces. If you save it in ASCII 
form, it will contain the spaces you see 
when you list it. You can. of course, re- 
load and run either form. If you edit a 
compressed line, the editor will put the 
spaces back in and you might want to 
compress the program again. 

Before you assemble the Listing, you 
need to check the four values in lines 
3 10-340. These are the addresses where 
Basic stores pointers to its program table 
(the list of program lines precompiled 
into internal format), its variable table, 
its array table, and the beginning of free 
space. To check those values, type in the 
following, beginning at TRSDOS Ready. 
End each line by pressing the enter key: 

DEBUG (E) 
BASIC. BASIC 
G 

10' 

Now hit the break key. type in D8000. 
and press the enter key. 

You have just entered a short Basic 
program that consists of a line number, 
a remark, and six asterisks, then entered 
Debug to see where the program resides. 
(You can return from Debug to Basic at 
any time by typing in G and pressing the 
enter key.) 

You should see asterisks in the middle 
of the Debug display. If not, press the 
plus sign until the asterisks appear. 
When they do. look for the three 00 bytes 
that precede the asterisks and write 
down the memory address of the last of 
those three bytes. 

Now type in D7100. Starting at 71A7 
hex should be a series of 26 bytes of 04 
hex. These indicate that all variables de- 
fault to type 4. single-precision numeric. 
If you use a DEFINT. DEFSTR, or DEFDBL 
command in your program, some or all 
of those bytes will change. 

The 2 bytes immediately before the se- 
ries of 04s should contain the address you 
just wrote down, but in reverse order. For 
example, if you wrote down 8135. you 
should see 35 81. If that value resides at 
71A5 and 71A6 hex. you can assemble 
the program without change. If it isn't, 
you'll have to search through memory 
(use the plus and minus keys) looking for 
the 26 04s immediately preceded by the 
address vou wrote down. When vou find 
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The squeeze 
filter checks the 
area starting at 
3000 hex to see if 
you have Basic 
active. 



it, you need to change the values in lines 
310-340. Line 310 contains the address 
of the pointer to the beginning of your 
program. Lines 320, 330. and 340 are the 
addresses of three pointers that immedi- 
ately precede that one. You probably 
won't have to change anything if you're 
using TRSDOS 6.2 and Basic 1.1.0. 

To understand how Squeeze works, 
you need to know how Basic stores pro- 
gram lines internally. Each line begins 
with the 2-byte address of the next line, 
which gives the program the form of a 
forward-linked list. Following that are 2 
bytes that contain the line number in 
normal LSB/MSB (least-significant byte/ 
most-significant byte) form. The token- 
ized form of the contents of the line fol- 
low the line number. Basic separates 
each line from the next with a single 00 
byte. The entire program ends with 3 
successive bytes of 00: The first is the 
line separator; the next two (which 
would normally be the link field) show 
that the line links to no other line. 

I've used two macro instructions in 
this program. The first makes using su- 
pervisory calls easier, the second stores 
the contents of the DE register pair at the 
address to which HL points. If your as- 
sembler doesn't support macros, you 
can easily expand each by hand. Next 
month, I plan to discuss macros in de- 
tail, including methods of expansion. 

Program Operation 

The code beginning in line 730 rep- 
resents a standard TRSDOS memory 
header that allows TRSDOS to find mod- 
ules in memory, and perform link, route, 
and filter operations successfully. Fol- 
lowing that is a small buffer for convert- 
ing line numbers to ASCII and two brief 
error messages. 

Line 910 (you might have to write sev- 
eral separate DEFB statements with 
some assemblers) contains the first 8 
bytes of the Basic/CMD program (you 
can verify they are correct with Debug) 
stored at 3000 hex. Most programs load 
into memory starting at 3000 hex and 
the Squeeze filter checks that area to see 
if you have Basic active. However, it is 
possible for those bytes to still reside in 
memory after you load and then leave 



Listing continued 










01560 


LOOP J 


PUSH 


u 


;Save address of memory link 




01570 




LD 


B,2 


;Get 2 characters 




01580 




CALL 


BUMP 


1 from (IX) to (IY) 




01590 


REL8 


EQU 


$-2 






01600 




OR 


A 


;Last one 00? 




01610 




JP 


Z,DONE 


; Yes — we're done 




01620 


REL9 


EQU 


$-2 






01630 


} 










01640 




LD 


L,(IX) 


j Get LSB of line number 




01650 




LD 


H, (IX+1) 


;Get line number 




01660 




LD 


DE,NUMBUF 


; DE==> buffer for ascii value 




01670 


REL10 


EQU 


S-2 






01680 




SVC 


0HEXDEC 


(Convert to decimal 




01690 




LD 


HL,NUMBUF 


;HL"> ascii string 




01700 


RELll 


EQU 


$-2 






01710 




SVC 


GDSPLY 


;Display on screen 




01720 




LD 


B,2 


jMove 2-byte line number 




01730 




CALL 


BUMP 


; from (IX) to (IX) 




01740 


REL12 


EQU 


5-2 






01750 












01760 


; Now 


scan 1 


ine of Basic until 


line separator is found 




01770 












01780 


LOOP 2 


LD 


A, (IX) 


;Get next byte 




01790 




OR 


A 


;Is it 00 line separator? 




01800 




JR 


Z.EOL 


;Yes — go 




01810 




CP 


REMARK 


;REM token? 




01820 




JK 


Z.REM 


;Yes — go 




01830 




CP 


i • i 


(Beginning a string? 




01840 




JR 


Z, STRING 


jYes — go 




01850 




CP 


EXTEND 


; 2-byte verb token? 




01860 




JR 


NZ,G01 


; No — jump ahead 




01870 




LD 


B,2 


;2 bytes to transfer 




01880 




CALL' 


BUMP 


; from (IX) to (IY) 




01890 


REI.13 


EQU 


S-2 






01900 




JR 


L00P2 


;And loop back 




01910 


G01 


CP 


SPACE 


;A space? 




01920 




JR 


NZ.G03 


;No — jump ahead 




01930 


G02 


INC 


IX 


jBump oource pointer 




01940 




JR 


L00P2 


;And loop back 




01950 


GO 3 


JR 


NC,XFER 


;Go if greater than a space 




01960 




CP 


LF 


;Line feed character? 




01970 




JR 


Z.G02 


(Yes — go. 




01980 




CP 


OCT 


;0ctal token? 




01990 




JR 


Z,INT 


(Yes — transfer 3 bytes 




02000 




CP 


HEX 


;Hex token? 




02010 




JR 


Z,INT 


;Yes — transfer 3 bytes 




02020 




CP 


LINE 


;Line number token? 




02030 




JR 


Z,INT 


•Yes — transfer 3 bytes 




02040 




CP 


BYTE 


;Byte token? 




02050 




JR 


Z,BYT 


;Yes — go 




02060 




CP 


INTEGER 


(Integer token 




02070 




JR 


Z,INT 


(Yes — go 




02080 




CP 


SINGLE 


(Single-precision token 




02090 




JR 


Z,SING 


;Yes — go 




02100 




CP 


DOUBLE 


(Double-precision token 




02110 




JR 


NZ,XFER 


;No — transfer one byte 




02120 




LD 


B,9 


;Bytes to transfer 




02130 




JR 


XFERB 


(And go 




02140 


SING 


LD 


B,5 


(Transfer single-precision 




02150 




JR 


XFERB 


(And go 




02160 


INT 


LD 


B,3 


(Transfer integer 




02170 




JR 


XFERB 


(And go 




02180 


BYT 


LD 


B,2 


(Transfer byte value 




02190 


XFERB 


CALL 


BUMP 


(Transfer number in B 




02200 


REL14 


EQU 


5-2 






02210 




JR 


LOOP 2 


(Scan some more 




02220 


f 










02230 


XFER 


CALL 


BUMP1 


;Move one byte from (IX) to (IY) 




02240 


REL15 


EQU 


5-2 






02250 




JR 


LOOP 2 


;And scan some more 




02260 


; 










02270 


; Transfer a 


string 






02280 


j 










02290 


STRING 


CALL 


BUMP1 


(Move opening quote 




02300 


REL16 


EQU 


5-2 






02310 


STRl 


CALL 


BUMP1 


(Move one character 




02320 


REL17 


EQU 


5-2 






02330 




OR 


A 


(EOL Mark? 




02340 




JR 


Z , EOL1 


(Yes — go 




02350 




CP 


■ >i 


(Closing quote? 




02360 




JR 


NZ,STRl 


(No — loop back 




02370 




JR 


L00P2 


;And scan some more 




02380 


1 










02390 


; Transfer & 


Truncate a remark 


(leave REM token in place) 




02400 


; 










02410 


REM 


CALL 


BUMPl 


(Move REM character 




02420 


REL18 


EQU 


5-2 






02430 


REMl 


LD 


A, (IX) 


;Get next character 




02440 




OR 


A 


;Line separator? 




02450 




JR 


Z.EOL 


(Go when end found 




02460 




INC 


IX 


(Else bump pointer 




02470 




JR 


REMl 


(And look some more 




02480 












02490 


; Process End-of-line (EOL) mark 




02500 












02510 


EOL 


CALL 


BUMPl 


(XFER line separator 




02520 


REL19 


EQU 


5-2 






02530 


E0L1 


PUSH 


IY 


(Move IY address to 












Listing continued | 
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Llsttng continued 








■2541 




POP 


DE ; 


DE registers 


02550 




POP 


HL ; 


Recover line link address 


82566 




LD 


(HL),E ; 


Set LSB of link 


02570 




INC 


HL ; 


Bump pointer 


02580 




LD 


(HL),D j 


Set MSB of link 


02590 




JP 


I.OOP1 


Process next line 


02600 REL20 


EQU 


S-2 




02610 










02620 


End- 


Df-proqram processinq 




02630 










02640 I 


lOME 


PUSH 


I* t 


Transfer address 


02650 




POP 


DE f 


to DE 


02660 




POP 


I¥ > 


Discard old link addr. 


02670 




LD 


HL,VAR_TBL j 


HL»«> var. table storage 


02680 




STORE 






02690 




LD 


HL,ARR_TBL ; 


HL==> array table storage 


02700 




STORE 


• 


Store address there 


02710 




LD 


HL,FRE_SPC | 


HL««> free space storage 


02720 




STORE 


1 


Store address there 


02730 










02740 C 


•JT 


POP 


I* 1 


Recover registers 


02750 




POP 


IX 




02760 




POP 


HL 




02770 




POP 


DE 




02780 




POP 


BC 




02790 




POP 


AF 




02800 




OP 


1 i 


Set NZ flag 


02810 




LD 


;.,<: i 


Return null key 


02820 




P.ET 




Return to Basic 


02830 










02840 


Bump 


and Transfer subroutine 




02850 










02860 


JUMP1 


LD 


B,l 


Entry for single transfer 


02870 


JUMP 


LD 


A, (IX) 


Get a byte 


02880 




LD 


(IY),A 


And store at new address 


02890 




INC 


IX 


Increment pointers 


02900 




INC 


IV 




02910 




DJNZ 


BUMP 


Repeat until done 


02920 




RET 






02930 










02940 


FLTEND 


EQU 


S-l 


End of filter 


02950 


PLTLEN 


EQL' 


S-BEGIN 


Length of memory-resident module 


02960 










02970 
02980 


















02990 


Initialization code 




03000 










03010 
03020 


















03030 


INIT 


PUSH 


DE 


Save DCB pointer 


03040 




LD 


(MODDCB) ,DE 


Stuff into filter 


03050 




LD 


HL.SGNON 


HL"> sign-on message 


03060 




SVC 


gDSPLY 


Display on screen 


03070 




LD 


UK, MOD SAKE 


DE«> module name 


03088 




SVC 


gGTMOD 


Already installed? 


03090 




JR 


NZ.VIASET 


Go if not found 


03100 




LD 


HL,INSTLD 


hl-»> error message 


03110 


ERR_OUT 


SVC 


gDSPLY 


Display the message 


03)20 




LD 


HL.-l 


Set extended error 


03130 




SVC 


gEXIT 


And leave 


03140 










03150 


Installed with SET command? 




03160 










03170 


/IASET 


SVC 


0FLAGS 


Point IY to flags 


03180 




BIT 


3, (IY+'C-'A 1 ) 


Test bit 3 of C-flag 


03190 




JR 


NZ, SETHI 


Go if SET used 


03200 




LD 


HL,NOSET 


HL«> error message 


03210 




Jf< 


ERR_OUT 


And leave 


03220 


1 








03230 


Reset HIGHS 


and prepare to re 


ocate filter 


03240 










03250 


SETHI 


LD 


HL.0 


Function: get current value 


03260 




LD 


B,L 


B-0 >> select HIGHS 


03270 




SVC 


&HIGHS 


Get current HIGHS value 


03280 




LD 


(OLDHI) , HL 


Save old HIGHS 


03290 




JR 


Z.RELOC 


Go if no error 


03300 




LD 


HL.MEMERR 


HL--> error message 


03310 




JR 


ERR_OUT 


And leave 


03320 










03330 


Move 


filter 


to high memory an 


i protect 


03340 










03350 


RELOC 


LD 


I Y , RELTAB 


lY--> Relocation table 


03360 




LD 


DE, FLTEND 


DE— > End of filter 


03370 




XOR 


A 


Reset carry flag 


03380 




SBC 


HL,DE 


Calculate distance to move 


03390 




PUSH 


HL 


and transfer to 


03400 




POP 


BC 


BC register pair 


03410 


HELOC1 


LD 


L, (IY+0) 


Get address to change 


03420 




LD 


H, (IY+1) 


in HL 


03430 




LD 


A,H 


Pick up MSB 


03440 




OR 


A 


Is it 0? 


03450 




JK 


Z , MOVE 


Yes — go move filter 


03460 




LD 


E, (HL) 


Move contents 


03470 




INC 


HL 


of address 


03480 




LD 


D, (HL) 


to DE :eg. pair 


03490 




EX 


DE.HL 


HL has value to change 


03500 




ADD 


HL.BC 


Add the offset 


03510 




EX 


DE.HL 


New value back in DF. 

Listing continued 



Basic. If you invoke the compression 
utility in that situation, it might run 
rampant trying to compress a /CMD pro- 
gram, garbage in memory, or even itself, 
and cause your computer to crash com- 
pletely. Be careful! 

The program begins to operate at line 
1060. Since it's a keyboard filter, it must 
first call the keyboard driver routine to 
collect a keystroke. Then it compares 
that key to the constant signal to see if 
you're invoking it. If so. control passes to 
line 1 180 where Squeeze pushes all the 
Z80 registers onto the stack and checks 
Basic's "signature." If everything is 
okay, compression begins at line 1490. 

Throughout the program, the IX reg- 
ister points to the current location in the 
uncompressed code, and the IY register 
points to the current location in the com- 
pressed code. The outer program loop, 
which begins at LOOP1 in line 1560. ex- 
ecutes for each line of your program. The 
inner loop, beginning at LOOP2 on line 
1780. executes for each byte of the orig- 
inal program. The inner loop cannot just 
discard all spaces and remarks because 
the internal representation of numbers 
might contain bytes that look like spaces 
or remark tokens. Instead, the inner loop 
must copy all numbers completely, along 
with their tokens, and look only for bytes 
to discard between numbers and outside 
of literal strings' quotation marks. 

At the end of the program (see line 
2640). three of Basic's pointers need to 
be updated. If not. you will have a com- 
pressed program but no extra free mem- 
ory because Basic still reserves memory 
space for your original program. 

The program code following line 2920 
is only to relocate and install the 
compression program. This is the same 
installation routine I've used many 
times and should look familiar to regular 
readers. The comments in the program 
should make most of it easy to follow. 

I've used the program without prob- 
lem on several Basic programs, and can 
usually reduce the size of a program by 
25 percent or more. However, the three 
"apparently unused" entries in the Ta- 
ble bother me. They might be used for 
numeric types I have overlooked. If you 
find a program line that chokes the 
compression program consistently, 
please send it to me. You might have 
found a numeric token that I have over- 
looked, and I would like to add it to the 
list and publish a program patch. ■ 

You can contact Hardin Brothers 
through CompuServe. Go PCS-117 to 
the Writers' and Editors' SIG (WESIG). 
You can also write to Hardin at 280 N. 
Campus Ave.. Upland, CA 91 786. En- 
close a stamped, self-addressed enve- 
lope if you want a reply. 
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THE NEXT STEP 



Listing continued 








03520 




LD 


(HL) ,D 


Put it back 


03530 




DEC 


HL 


in the 


03540 




LD 


(HL) ,E 


filter program 


03550 




INC 


IV 


Bump IX to next 


03560 




INC 


IY 


entry in the table 


03570 




JR 


RELOC1 


Repeat until done 


03580 










03590 


; Move 


module 


to high memory and protect 


03600 










03610 


HOVE 


LD 


DE, (OLDHI) 


DE»»> destination address 


03620 




LD 


HL.FLTEND 


HL==> current end of filter 


03630 




LD 


BC,FLTLEN 


BC==> length of module 


03640 




LDDR 




Move it all 


03650 




EX 


DE,HL 


Move new HIGHS to HL 


03660 




LD 


B,0 


Function: select HIGH? 


03670 




SVC 


PHIGHS 


Set new HIGHS value 


03680 




INC 


HL 


HL=~> filter entry point 


03690 










03700 


; Set 


type and address in filter's DCB 


03710 










03720 




POP 


IX 


Get DCB address off stack 


03730 




LD 


(IX),01000101B 


Set as FILTER capable of 


03740 








iGET & 0CTL 


03750 




LD 


(IX+1),L 


LSB of filter address 


03760 




LD 


(IX+2) ,H 


MSB of filter address 


03770 




LD 


HL, SUCCESS 


HL"> Success message 


03780 




SVC 


0DSPLV 




03790 




LD 


HL,0 


Show success 


03800 




SVC 


8EXIT 


Back to TRSDOS 


03810 










03820 


; Initialization messages 




03830 










03840 


MODNAME 


DEFM 


'SQUEEZE' 




03850 




DB 





Our filter's module name 


03860 


SGNOM 


DEFM 


'BASIC Program Compression Utility' 


03870 




DB 


CR 




03880 


INSTLD 


DEFM 


'Program already 


in memory — installation aborted' 


03890 




DB 


CR 




03900 


NOSET 


DEFM 


'Filter must be 


installed with SET command' 


03910 




DB 


CR 




03920 


MEMERR 


DEFM 


'High memory not 


available for installation' 


03930 




DB 


CR 




03940 


SUCCESS 


DEFM 


'Installation successfully completed 1 


03950 




DB 


LF 




03960 




DEFM 


'Use FILTER comm 


and to connect to *KI' 


03970 




DB 


LF 




03980 




DEFM 


'Then use <Clear 


><ShiftXS> to invoke' 


03990 




DB 


LF 




04000 




DEFM 


'WARNING: Do no 


t invoke unless Basic is Active!' 


04010 




DB 


LF 




04020 




DB 


CR 




04030 










04040 


; Relocation 


table 




04050 










04060 


RELTAB 


DEFW 


RELl , REL2 , REL3 , REL4 , REL5 , REL6 , REL7 


04070 




DEFW 


REL8,REL9,REL10, 


RELl 1, RELl 2, RELl 3, RELl 4 


04080 




DEFW 


REL15,REL16,REL1 


7,REL18,REL19,REL20 


04090 




DEFW 





;Mark end with 2 bytes of 


04100 


1 








04110 




END 


INIT 


End 



80 Micro does not keep subscription 
records on the premises, therefore 
calling us only adds time and doesn't 
solve the problem. 

Please send a description of the prob- 
lem and your most recent address la- 
bel to: 

80Micro 

Subscription Dept. 

PO Box 981 

Farmingdale, NY 11737 

Thank you and enjoy your subscription 



Circle 207 on Reader Service card 

Scotch Diskettes 

Rely on Scotch* diskettes to keep your vaiu 
able data sate Dependable Scotch diskettes 
are tested and guaranteed error free The low 
abrasivity saves your read/write heads 
They're compatible with most diskette drives 




(800)235-4137 



Dealer mq u i"e» 
invited 




fyMw** 




Jan. 1980 to June 1980 . . $3.00 each 
July 1980 to May 1983 ... $3.50 each 
June 1983 to present . . . $4.50 each 
Add $1.00 per magazine for shipping. 
10 or more magazines add $7.50 per 
order for shipping. 

80Micro 

Back Issue Order Dept. 

80 Pine Street 
Peterborough, NH 03458 



Get help with your subscrip- 
tion by calling our new toll free 
number: 

1-900-221-^92 

between 9 a.m. and 5 p.m. 
EST, Monday-Friday. 
If possible, please have your 
mailing label in front of you as 
well as your cancelled check 
or credit card statement if you 
are having problems with pay- 
ment. 

If moving, please give both 
your old and new addresses. 
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SPREADSHEET BEAT / edited by John B. Harrell III 



On Displays: 
Sprucing Up Your Spreadsheet 



Multiplan's Lookup function can 
give you a great deal of flexibility 
when you're doing calculations that must 
account for changing values. It will auto- 
matically go to a table, find the numbers 
that are right for the specified condition, 
and adjust its calculations accordingly. 

Let's look, for example, at a spreadsheet 
that calculates employees' income taxes 
(Fig. 1). The spreadsheet is for 1984. and 
assumes that the employees are married 
and filing joint returns. The equation to 
calculate federal taxes (column 3) is sim- 
ple: Base + Percentage* Over-amount. All 
three variables in the formula, however, 
change with the salary of the employee. 
How can one equation in column 3 take 
these changes into account? 

This is where the look-up table comes 
in. This spreadsheet refers to three, in 
columns 5-7. The base comes from col- 
umn 6, the percentage from column 7, 
and the over-amount by subtracting the 
minimum salary (column 5) from the ac- 
tual (column 2). The tax equation be- 
comes the Multiplan formula in Fig. 2. 

Let's get a quick look at how the 
spreadsheet works, using an income of 
$25,000 as an example. 

The function Lookup (N, Table) searches 
for the first value (N) in the first row or col- 
umn of the area specified by Table. Multi- 
plan searches down a square or vertical 
table and searches left to right through a 
horizontal table. Lotus uses ©VLOOKUP 
and ©HLOOKUP to do the same. 

Lookup searches down Salary table 
to find $29,000 in row 13. Since this is a 




Multiplan formula in column 3: 
LOOKUP (RC[ - 1 ].Base Table) 
+ LOOKUP(RC[ - l],Percent- 
age table) *(RC[ - 1] - LOOKUP 
(RC[ - l],Salary_table)) 

Base— table. Percentage— table, and 
Salary _table are named ranges of 
the tax table above as follows: 
Salary-table— R3: 18C5:5 
Base-table— R3: 18C5:6 
Percentage _ table— R3: 18C5:7 

Figure 2. Formula for spreadsheet. 



1 2 3 4 


5 


6 


7 


1 Employee Information i 

2 I 

3 EMPLOYEE NAME SALARY FED TAX : 


Tax Tables 




MINIMUM 




BASE $ 



PERCENT 
0% 


S Swanson, Clarke E. 57,825.00 14,341.50 : 


6 Harrell, John B. 32,469.00 5,509.32 : 


3,400 





lit 


7 Harrell, J.B. 25,000.00 3,565.00 : 


5,500 


231 


12% 


8 Harrell, Bonnie S. 10,000.00 819.00 : 


7,600 


483 


14% 


9 Harrell, J. Matthew 3,000.00 0.00 : 


11,900 


1,085 


16% 


10 i 


16,000 


1,741 


18% 


11 I 


20,200 


2,497 


22% 


12 i 


24,600 


3,465 


25% 


13 « 


29,900 


4,790 


28% 


14 I 


35,200 


6,274 


33% 


15 « 


45,800 


9,772 


38% 


16 i 


60,000 


15,168 


42% 


17 « 


85,600 


25,920 


45% 


18 I 


109,400 


36,630 


49% 


19 < 


162,400 


62,600 


50% 


20 I 


999,999 






Figure 1. Spreadsheet for calculating federal taxes using look-up 


tables. 



Value 


Color 






Value 


Color 





Black 






8 


Gray (black on 2000) 


1 


Blue 






9 


Bright blue 


2 


Green 






A 


Bright green 


3 


Cyan 






B 


Bright cyan 


4 


Red 






C 


Bright red 


5 


Magenta 




D 


Bright magenta 


6 


Brown 


(yellow on 


2000) 


E 


Bright yellow 


7 


White 






F 


Bright white 






Figure 3 


Color selections for Lotus. 
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"I am amazed at the broad spectrum of 
technical articles you publish, for both 
novice and advanced programmers . . . " 





If you're still wondering which magazine you should 
buy for your TRS-80*, here's what 80 Micro readers 
have to say about their #1 system -specific information 
source — 

•"Not only Is the magazine very professionally done, 
but 1 have found something in almost every issue that 
has been worth the price of the subscription ..." 

Roger I. Iloktege 
Millersvillf, MD 

•"I was greatly impressed by your magazine. I got more 

useful information from that one issue of 80 than 1 have 

from countless other sources. . ." 

John M. Crittenden 
Jackson, MS 

•"I have found 80 Micro to be the most valuable mag 
azine pertaining to home computers on the market. . ." 

William C. Hardin, Jr. 
Charlotte, NC 

80 Micro is the magazine for every TRS-80 user from 
beginner to advanced. 80 Micro is full of tutorials, free 
programs, hardware modifications, new product an- 
nouncements, product reviews, debugging tips, and 
more. 



And an 80 Micro subscription is risk-free. If you're 
not completely satisfied, you'll be reimbursed for all un- 
delivered issues. See what 80 Micro can do for you. It's 
#1 for a lot of people. Fill out this order form and send 
it in now. 

■ i ks M ii .i tiadeiMii at Radio Sfaadi ■■ dfeWon ■>•■ I n4| I 



Yes! 



1 want a no-risk subscription to the 
magazine for beginner to advanced TRS-80 

users. Send me 12 issues of 80 MICRO lor 
$24.97! ril save 48$ off the newsstand price! 



] Paymenl Enclosed 



□ Bill me 



Name 



Address 



State 



Zip 



Canada & Mexico. $27.97 Foreign surface. $41.97 1 year only. 
US funds drawn on t'S bank Please allow 6 8 weeks for delivery. 

BOmiCrO • PO Box 981 • Famingdale. NY 1 1737 

j 35DB8 



Circle 133 on Header Service card 



CDR 



COMPUTER SALES 



10O8-D 



SINCE 1977 



NO SALES TAX COLLECTED 

(N.J. Residents add 6%) 



TANDY 1000 
SUPER SYSTEM 



... 






l^t 




t 

r 


~ m 


% 


i 


■ 


\\ 






4& 



Tis the Season to Save! * bonus* 

CDAS 

EARIY SHOPPER 
BONUS 
6 ouflet 

SURGE PROTECTOR 
By E.P D 
A S49 Value 
ABsoiutely 
FREE' i 

exp.12/10'85 
LIST-S2 322 

ALL 

FOR ONLY! 

$1,699 



•TAMOY 1000 w'DESKMATE softwore 

Tex! Processor. Electronic Worksheet. 

Filer. Telecom. Coiendar & Mail 
•MS-DOS BASIC 
•TANDY 2nd DISK Drive installed 
•PB/S MFB-1000 muttirunction Bd 

* 256* ol RAM Serial Pod. Clock/ 

Coiendar 

•TANDY VM-2 Monochrome Monitor 
•Box ol 10 SKC Diskettes 
•EPSON SPECTRUM LX-80 Printer w/NLQ 

mode tor word processing 
•EPSON LX 80 TRACTOR leed option 
•Deluxe Printer Coble 
•Cose Ot THIROWAVE COMPUTER PAPER 
•EPSON replacement RIBBON 



GIVE A G/FT TO REMEMBER 




Designed lor use wrtti the Tandy 1000 The MFB 1000 mulhlunctior 
Board contoins 3 ol the most needed functions all on one 10 
board includes its own DMA controller. 256k ot RAM (upgrode to| 
512k), a serial communications pott and a Battery backed rea 
Time Clock/ Calendar Also compatible with other IBM compatiBies 



COMPLETE THAT WISH UST! 

EPSON FX 85 PRINTER PKG. 



SPREADSHEET BEAT 




SAVE OVER 

■200 

COMPUTE 
REAM 
TO ROM! 

SPECIAL! 
(439 



•EPSON FX 85 printer w/32 C P S NLO 

Mode 8k Butter. Friction .'Pin Feed 

Seiectype. But image Graphics 
•EPSON FX-85 TRACTOR Feed Option 
•Deluxe Printer CaBle 

ipieose specify Radio Shack model) 
•KENSINGTON ToBle Top PRINTER STAND 
•Case at THIROWAVE COMPUTER PAPER 
•EPSON Replacement RIBBON 
•COVER CRAFT Printer DUST COVEP 

LIST S652 80 Tk tfu $MSO* H $**! 

M.||.|,IM.|'IIJI!.|.RH*I.UB 

Inquiries Price Quotes and in N.J call 

201 728 8080 
ORDERING INFORMATION AND TERMS 
Mail 10 COA COMPUTER SALES 
31 Hi 
include address and phone numbe 
are additional Add 2% UPS Ground ($3 50 mimmumi UPS Blue 6AJ 
(S5 00 minimum) NO COD Cashiers checks monevorders an 
ship immediately Peisonai and company checks allow 1! 
rJayj ORDER 9am 7pm FST Monday Fnday Saturday 10-4 OUI 
REFERENCES. We have Been selling computers since 1977 1 1 

• Miltorfl, N J DAB listed SATISFACTIOF 
GUARANTEED 1 I' , - ft no! 100% satisfied return wrtnm 7 days to 
h •., •'. J ORDER VIA COMPUSERVE You may place orders via] 
r.C MALL 24 hours a day, 7 days a week 



single-column table, the value returned 
is from the preceding row — $24,600. 
Lookup then searches down Base table 
and Percentage table, again stopping at 
row 12. The base. then, is $3,465. and 
the over-amount is $400 ($25,000- 
$24,600). Plugging the numbers into our 
equation, the federal tax is $3,465 plus 



25 percent of $400. or $3,565. 

Put all of this together, and you have a 
nice tax calculator. If you let your imagi- 
nation wander, you quickly realize that the 
formulas for tax calculations in column 3 
could be extended to use any of four table 
areas, depending on whether you are mar- 
ried or single. 



Action 


Comments 


DEBUG TD.DRV < ENTER > 


Load Debug and the LOTUS text display 




video driver. 


E 17D< ENTER > 


Begin editing memory at offset address 




017DH in the driver. 


WW<SPACE> 


Enter first color selection from Fig. 3; enter 




the hexadecimal digits from the color selec- 




tion table in the proper order for each attri- 




bute byte. 


XX < SPACE > 


Enter second color selection. 


YY< SPACE > 


Enter third color selection. 


ZZ< ENTER > 


Enter fourth color selection. 


W< ENTER > 


Write the modified TD.DRV driver back to 




the disk. 


Q< ENTER > 


Exit Debug to MS-DOS. 


Figure 4. Instructions 


for modifying colors in IBM-PC Lotus. 



Color 


Byte 


IBM PC Lotus 


Tandy 2000 Lotus 


WW 




Used to set normal colors. 


Used to set the background 
colors for normal text and 
borders. 


XX 




Used to set colors for the 


Used to set the foreground 






spreadsheet border. 


color for normal text and 
borders. 


YY 




Used to set colors for un- 


Used to set the background 






protected cells and help 


color for help text and unpro- 






text without the cursor. 


tected cells. 


zz 




Used to set colors for un- 


Used to set the foreground 






protected cells and help 


color for help text and unpro- 






text with the cursor. 


tected cells. 




Figure 


5. Description of bytes used to modify Lotus colors. 



Action 


Comments 


DEBUG TD.DRV < ENTER > 


Load Debug and the LOTUS text display 




video driver. 


E18D< ENTER > 


Begin editing memory at offset address 




018DH in the driver. 


WW < SPACE > 


Enter first color selection from Fig. 3; enter 




the hexadecimal digits from the color selec- 




tion table in the proper order for each attri- 




bute byte. 


XX < SPACE > 


Enter second color selection. 


YY< SPACE > 


Enter third color selection. 


ZZ< ENTER > 


Enter fourth color selection. 


W< ENTER > 


Write the modified TD.DRV driver back to 




the disk. 


Q< ENTER > 


Exit Debug to MS-DOS. 


Figure 6. Instructions for modifying colors in Tandy 2000 Lotus. 



Circle 470 on Reader Service card. 



Circle 452 on Reader Service card. 



96KMODEL100 

The PG Design 64K RAM module adds two additional 32K RAM 
banks to your existing Model 100. The firmware that comes in 
your Model 100, BASIC. TEXT, TEIXTOM. ADDRSS, SCHBDL, 
are all present in each additional RAM bank. 
You may transfer files from one RAM bank to any of the other 
RAM banks by using the function keys. 

We designed our RAM module to allow clear access to the ROM 
slot and we provided a forty pin, male connector to utilize Radio 
Shack s DV1 or other disk drive systems. We have installed a 
lithium power cell to maintain the memory' of the module for six 
months if you should remove it from your Model 100. But, while 
in the Model 100, the power cell has a life span over sue years' 
The RAM module snaps easily into the expansion port in the 
bottom of your Model 100. 

Guarantee 

We guarantee that all PG Design products perform to your complete 
satisfaction or your money back! Wc manufacture the highest quality- 
RAM modules available anvwhere. 



Order Today 


64K RAM module 


$375 


32 K RAM version 


$250 


Upgrade later for 


$150 


*HK Ram modules 


or $29.95 ea 


Model 100- 




Sel of three— 


$K4.00 


•24K RAM modules 


$139 


for Model 200 




Two or more- 


$135 ea. 


send check, money- 


order. 


Visa & Mastercard 


accepted 




PG Design Electronics, Inc. fiwwo Gratiot Richmond mi mow i313|727 



FX/RX Owners 



THIS 

(Draft Print) 



Q 



or 



THIS 

(NLQ Print) 
(5 x size) 



g 



Install our new LetterWriter NLQ upgrade kit In your printer 
and you can choose NLQ (or any of 1 5 other print features) 
by simply tapping your printer panel buttons. NLQ print has 
four times the resolution of draft print. That means finer 
character detail, no visible dots, and impressive-looking 
documents. The FX version even adds IBM Graphics 
printer compatibility. With LetterWriter in your FX or RX. 
you may never need to buy a letter quality printer Why not 
get LetterWriter for your printer today 7 

NLQ 12345abcdefghiJKLMNOPQRS 
Draft i :def ghi JKLMNOPQRS 



FINGER 
.PRINT 

I Let terWriter 

^ W> NLQ Upgrade Kit 
^^ by: 



$79.95 $59.95 
FX RX 

For all FX-80/iOOand HX-80'100 
printers including F/T and + series 
Simple ptug-in installation 
Complete instructions included 



Dresselhaus Computer Products. Glendora, CA 
Call (818) 914-5831 for dealer nearest you. 



Circle S36 on Reader Service card. 



Fas tPak Business Mail System 



Correspondence 
Direct Mail 
Mailing Lists 
Addressing 
Form Letters 
Tickler Files 
Newsletters 
Sales Letters 
Credit Letters 
Sales Follow Up 
Collection Letters 
Boilerplating 
Envelopes 
Invoicing 
Labels 
Notices 
Resumes 
1099 Forms 
Forms Fill-in 



Premium 
Software 



Affordable 
Prices 



Any place you need a name and address 

FastPak Mail from DHA Systems & Software. A complete 
library of programs that does everything for mail but lick the 
stamps. No frustration, no learning, no set-up. Easy to use. 

Organize all your name, address, and phone files in one 
place. Input and corrections are easy, just fill in the blanks. 
Add your own codes. Fast, easy, flexible sort. Select names 
for special mailings. 

Run labels and letters at the push of a button. 
FastPak Mail includes a powerful system for merging let- 
ters and mail files for any kind of letter writing — from routine 
correspondence to personalized direct mail letters. 

"Your product is excellent ." — John Stevenson. 
Experts in Direct Marketing 

". . . the best direct mail product aid I ever bought." 
— Ralph Thomas. Thomas Publications 

"FastPak Mail is a bargain to say the very least." 

"We are totally amazed at what your mailing list 
system can do. The sod and merge functions are 
fantastic, as is the entire package in general." 
— Steven Friedman. SHF Software Systems. 



Merge - Works with all the 
popular word processors, Word, 
Wordstar, Multimate, etc. Create 
form letters with fill-ins. Easy 
enough for 1 letter, powerful 
enough for 5000. 



Sort, Select, Combine 

Lets you organize your files 
anyway you want, by zip, 
names, or special codes. 



Conversion no need to 
retype your list Easily convert 
your existing lists to our format 



Purge - Eliminate duplicate 
names 



DHA Systems & Software 

832 JURY COURT/SAN JOSE, CA 951 12/(408)947 1011 



Economical 

Easy to buy 



$79 



95 



To Order: Send check or money order for S79.95 plus $5.00 
shipping and handling. California residents add sales tax. 
Phone orders, Call 800/FastPak. Visa/MC welcome. 



RUNS ON MODEL 4 AND 
MODEL 1000 (CPM OR MS-DOS) 



80 Micro. December 1985 "119 



SPREADSHEET BEAT 



Lotus Land 

I get bored with the color selections on 
the IBM and Tandy 2000 versions of Lo- 
tus 1-2-3. Color displays are meant to 
display color! Changing your Lotus 
colors takes less than five minutes and 
anyone can do it. 

Let's tackle the IBM-PC compatibles 
first. Lotus sets the colors for each char- 
acter by writing a distinct color attribute 
for each position. Color video memory is 
organized into pages of 4,000 bytes con- 
taining a character byte followed by an 
attribute byte. 

The attribute byte contains two 4-bit 
numbers that identify the color of the 
character background and the color of 
the character itself. The foreground 
color can be any of the colors in Fig. 3 
while the background color is limited to 
selections zero — 7. Adding eight to the 
background color forces the character to 
blink. For example. IF gives bright 
white characters on a blue background, 
while 9F causes the characters to blink. 

Now. armed with this knowledge, se- 
lect background and foreground colors 
for the spreadsheet border, the text on 
the spreadsheet, unprotected cells or un- 
selected cursor locations in the help 
mode, and unprotected cells or actual 



cursor location in the help mode. Write 
these down, remembering to organize 
them in each byte as background/fore- 
ground, and fire up Debug. 

Place a disk containing Debug in drive B 
and the Lotus system disk (it must contain 
the file TD.DRV) in drive A. Follow the in- 
structions in Fig. 4, entering each step just 
as it appears. Replace WW, XX, YY. and ZZ 
with your color values: see Fig. 5 for a de- 
scription of each byte. When you're done, 
run Lotus Access: you should see the 
changes immediately. 

The Tandy 2000 Lotus works differ- 
ently on the 2000 than it does on other 
MS-DOS machines. The spreadsheet 
frame and text are displayed using some 
colors in the monochrome text mode. 

For the Tandy 2000, the monochrome 
video is organized into a single page of 
text arranged like the IBM PC. Unfortu- 
nately, the attribute bytes don't resem- 
ble the PC's. These attributes do allow 
setting normal or high-intensity display, 
blink, underlining, and reverse video. 
The normal and high-intensity modes 
select their respective colors from the 
palette register contents and you can 
control these values. All 16 colors in Fig. 
3 are allowed for setting the values. 

Normal or highlight characters may 



also be displayed in reverse video. Lotus 
uses these four combinations to display 
all text. While you have no control over 
the attributes used to display text, you 
can control the colors used for each mode. 

Again, use Fig. 3 to select the colors 
you want. The first will control the back- 
ground color of the normal text and the 
second the foreground color. These 
colors will also be used for the border, 
which is displayed in reverse video (the 
functions of these two colors are re- 
versed). The third and fourth choices set 
the colors for the help text and unpro- 
tected cells. You enter each of these 
colors as a single byte: for example, 
bright green as byte OA. 

Figure 6 gives directions on using De- 
bug for the Tandy 2000. Follow them as 
you would those for the PC-compatibles. 
You should immediately see your color 
selections when you run Lotus. 

A final word of warning: You can select 
some bizarre color choices. You might 
need to experiment before you find the 
colors you like. ■ 

Write to Spreadsheet Beat do 80 Mi- 
cro. 80 Pine St., Peterborough. NH 
03458. We will pay $50 for any tem- 
plates that we publish. 
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UNINTERRUPTIBLE 
POWER SYSTEMS 

By Sun Research 
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late costly downtime and lost data caused by 
ose momentary power losses. Protect your soft- 
are and hardware from damage caused by sudden 
ops in line voltage. Isolate your computer system 
►mpletely from the AC wall circuit with a MAYDAY 
►ntinuous(On-Line) Uninterruptible Power Syst. 
Ive all your components clean 60Hz sine wave 




loblein 150,300,600. lOOOand 1500VA Cap, 



MAYDAY" Division 
SUN RESEARCH. INC. 
Old Bay Road. Box 210 
New Durham. NH. 03855 
(603) 859-7110 
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Runs On TRS 80 MOD 3-4 On CP/M 
TRS 1000-1 100-2000 On MSDOS 
TRS 80 MOD. 2-12-16 On 
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635 MAIN MONTROSE. CO 8M01 
(303) 249-1400 1-800-625-1040 
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Radio Shack Registered Name Of Tandy Corp. 



70 INCOME TAX PROGRAMS 

(For Filing by April 15th, 1986) 
TRS-80 Models I, II, III, 4/4P, 12 and 16 
and this year: PC-DOS and MS-DOS* 

FEATURES: — 

1 . Our 7th year in TAX 6. BASIC, Unprotected 
Programming 7. Don't change paper 

2. Menu Driven Programs ALL SEASON! 

3. ' 'SAVE ' ' on Disk 8 We Stand Behind 

4. View on Screen before Printing our Programs! 

5. Correctable 9. Write for Details. 

For the Tax Preparer, C.PA., Lawyer and Individual. Hundreds of long-time 
Users. You buy ONLY the disks you need 

Programmed for easy-use. Programs follow the Forms closely. Check-points 
along the way. Results on screen before printing; can be corrected. 

70 TAX PROGRAMS include: Forms 1040. 1040A. 1120. 1120A, 1120S. 1065 
and 1041. Also ALL Schedules, and Forms 1116, 2555. 2106. 2119, 2210. 2441, 
3468. 3800. 3903. 4136. 4137, 4255, 4562, 4684. 4972, 4797, 5695, 5884. 
6251, 6252, 6765, 8027, 8283. 8332 and 8379 Also Tax Preparer HELPER 
disks. 

There are 14 disks (<a S24.75) for the Model I; 7 disks ((a S49.50) for the 
Models III. 4'4P. PC-DOS and MS-DOS; and 3 disks (c S99 ) for the Models 
II. 12 and 16. Buy only the disks you'll need. MO & ME buyers, add Sales 
Tax, please. Write for details 



For TRSDOS Programs, WRITE: — 

GOOTH TAX PROGRAMS 

931 S. Bemiston • St. Louis, MO 63105 

*For PC-DOS and MS-DOS Programs, write: 

MICROCRON SYSTEMS 

P.O. Box 561, Old Town, ME 04468 
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T80-FS1 



Simulator 



Available for Model I or Model III. $25.00 
on cassette or $33.50 on disk (with 
enhancements) All versions require 16K. 




See your dealer! 



If you order direct, please specify whether you have Model I or 
Model III (the media are different) and whether you want disk or 
cassette. Include $1.50 and indicate UPS or first class mail. Illinois 
residents add 5% sales tax. Visa and Mastercard accepted. 

If you don't yet own a disk, don't fret You can upgrade anytime. 
Cassette users may send back their cassette (but not the manual) 
along with $10 (first class shipping Included) and receive the disk 
version. 



LOGIC 

Communications Corp. 
713 Edgebrook Drive 
Champaign, IL 61820 
(217) 359-8482 
Telex: 206995 
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$777 



NEW! 



Comes complete with cable 
and choice of software driver* 

(CPM, LDOS, TRSDOS) 

10 Megabyte Hard Drive «P09%7 

15 Megabyte Hard Drive I U95 

30 Megabyte Hard Drive 1 15f O 

SYSTEM FEATURES 

• For TRS-80 Model 3-4-4P 

• One Year Parts & Labor Warranty 

• Size Rated After Format 

• Continuous Duty Power Supply 

• Error Checking & Correcting 

• Continuous Duty Fan 

• Size 11.5" x 12.5" x 5.0" 

• All Contacts Gold Plated 




5 MEG 
HARD 
DRIVE 



There are firms which offer benefits, experience or products seemingly 
too good to be true. Now why would you want to expose yourself to 
unhappiness when Aerocomp has a proven record of thousands of 
happy, satisfied TRS-80 customers. Just take a minute to look through 
back issues of this magazine. You won't find many companies that have 
been around as long as Aerocomp. We fully support TRS-80 computers 
and most all operating systems including CP/M 2.2. Aerocomp leads the 
way to low hard disk prices so you can afford to enjoy the benefits 
of increased storage and faster disk I/O. These units are precision 
engineered, tested and delivered complete and ready to use, right from 
our stock. Each unit is guaranteed for one year parts and labor. You 
can count on us to be here if you should ever need us. As always, 
your satisfaction is assured with our 14 day free trial offer. If, for some 
reason, you are dissatified with our drive merely return it for a full refund 
(less shipping). How can you go wrong? Specify the software driver of 
your choice and start enjoying your computer's real capability. Do it 
today! Call our toll-free number now! 



Mod* 4 raqurw TRSOOS 9 2 or Morwwum* Mfcro CP/M 2 2 



MODEL I 

DOUBLE DENSITY BOARD 

Add 80% more capacity to your disk 
system with the Double Density 
Controller (DDC) from Aerocomp. 

The Story 

Some products have what it takes to seem to last forever Our DDC is 
one of those products. What it does is allow you to operate your TRS-80 
Model 1 disk system in double density in this case double density means 
almost doubling the storage capacity of your diskettes Single density, thats 
the way Radio Shack designed your Model l expansion interface, organizes 
your disk into 10 sectors per track. Each sector contains 256 bytes of data 
for a total storage capacity of 2,560 bytes or 2.5K per track times the number 
of tracks your drive is capable of adressing. Double density, on the other 
hand, writes 18 sectors per track each containing 256 bytes for a total of 
4,608 bytes or 4.5K. That is 80% more data in the same space Why didn't 
Radio Shack do that in the beginning, you ask? Well it costs money to do 
double density because it is more difficult to do than single density and the 
data is harder to capture reliably. That means more cost and the Model l 
was meant to be a low-cost computer for the masses Therefore, no double 
density for the original Model I. 

The Facts 

Other companies introduced double density controllers for the Model I but 
they were not so good We waited and waited but, even new models failed 
to correct problems with data separation that kept cropping up So we went 
to work and came up with a new design to cure the old problem. At last 1 
A double density controller for the Mode) I with a higher probability of data 
recovery than with any other double density controller on the market then 
or since Our analog design phase lock loop data separator has a wider 
capture window than the digital types the others use This allows high 
resolution data centering Our DDC analog circuit allows infinately variable 
tuning The attack and settling times are optimum for 5 25' diskettes The 
oft-stated fears of adjustment problems rumored by digital dilettantes have 
been proved groundless by thousands of satisfied users the world over. The 
bottom line here is state-of-the-art performance and reliability 



See opposite page III III 




Copyright 1985 






ORDER YOURS TODAY 

TRS-80 Model I disk system owners who are ready for reliable double density 
operation will get 80% more storage per diskette; single and double density 
data separation with far fewer disk I/O errors; single density compatibility; 
simple plug-in operation You will need a disk operating system that has the 
necessary double density software All the popular DOS s (except TRSDOS) 
have the dnvers We have put together two special packages in the event 
you don't already have one of the more popular DOS's 

H— add %* lanAng t shipping. 

"DDC" by itself $99 

"DDC" and LDOS 159 

"DDC" and NEWDOS 80 2.0 ....179 
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£T40 Track 
O-BO Track 
r^ Single Head 
rPDual Head 
r^Bare 
[^Complete 
r^Full Size 
r^Half Size 
^3-1/2", 5-1/4" or 8" 



DISK 
DRIVES 



Aerocomp leads the way to the BEST value in disk drives and related peripheral products 
on the market today. Sound engineering, high performance, quality construction, no-risk 
free trial, outstanding warranty service and a reputation for doing the right thing make 
your decision to buy Aerocomp the correct one. Please look over our offerings and 
make your selection. When you have made your choice call our toll-free number and 
place your order. If you need assistance in making your selection, please call our 
information number. It's listed in the box at the bottom of this ad along with the technical 
assistance number for those of you who want to get right to the nittyijritty. Thanks, 
we all appreciate your business and will continue to do our very best to support 
you. 



BARE DRIVES 



Add $4 S&H 



III 



COMPLETE DRIVES Add$es*H 



These drives are completely 
burned-in and tested for your ulti- 
mate satisfaction. Add that extra 
drive today! These are new factory 
drives. No blems. seconds, closeouts or defunct 
manufacturers surplus (MPI, Shugart, etc). In- 
struction manual included at no extra cost. Ser- 
vice manuals are also available. See 
"Miscellaneous Goodies' for information. 

40tk SS half high TEAC FD35-A $ 99 

40tk DS half high TEAC FD35-B 109 

80tk DS half high TEAC FD35-F 129 

40tk SS full size Tandon TM100-1 119 

40tk DS full size Tandon TM100-2 .119 

40tk SS half high TEAC FD55-A 89 

40tk DS half high TEAC FD55-B 99 

80tk DS half high TEAC FD55-F 119 

8" SS Thinline Tandon TM848-1 E 260 

8 DS Thinline Tandon TM848-2E 335 



8" FLOPPY DRIVES Add $12 s&h 



I 



These 8" Thinline drives work 
with the Model 2 and 16 plus 
others that use standard 
drives. The rugged all-steel 
cabinet has an extra heavy 
duty power supply rated for continuous operation 
A removeabie air filter allows only dean air to 
circulate. Cabinets with single drives are supplied 
with a blank panel to cover the unused space. A 
second drive can be added at any time. Service 
manuals are available See "Miscellaneous 
Goodies'' for info. 

1-8" SS Tandon TM848-1E & case $389 

2-8" SS Tandon TM848-1E's & case 649 

1-8" DS Tandon TM848-1E & case 439 

2-8" DS Tandon TM848-2E s & case 699 



MISCELLANEOUS GOODIES w s*h 

Model 1 TRSDOS 2.3 disk & manual $25 

Model 3 TRSDOS 1.3 disk & manual 25 

Model 4 TRSDOS 6.2.x disk & manual 20 

LDOS (specify Model I or III) 69 

NEWDOS 80 v2.0 (specify Model I or III) 99 

Montezuma Micro Model 4 CP/M 2.2 169 

Tandon TM100-1/2 Service Manual 20 

Tandon TM848-1/2 Service Manual 20 

TEAC FD55A/B/F Service Manual 20 

10 SSDD disks in library box. Lifetime Guar 12 
10 DSDD disks in likrary box. Lifetime Guar 15 

5.25" drive power supply & enclosure 59 

8" drive pwr sply & end w/fan 5V-24V 150 

5.25" 1-drive cable, a nice length 19 

5.25" 2-drive cable, a 44 incher 24 

5.25" 3-drive cable, just the right size 29 

5.25" 4-dnve cable, the top dog 34 

5.25" Extender cable with gold contacts 10 



I 



Fits TRS-80 Models 1 ,3,4 and the 
Color Computer plus the others 
that use standard drives. The drive 
of your choice is mounted in a 
sturdy, all-steel cabinet. An external gold plated 
drive connector allows cabling without disassem- 
bly of the cabinet. Half-high drives come in a full- 
size cabinet that will hold and power our half-high 
drives. Single drives have a panel covering the un- 
used space allowing a second drive to be added 
at any time. All are shipped fully assembled ready 
to use. Specify silver or beige cover. Stainless 
Steel covers are available for $12 additional. 

1-40tkDS3.5" FD-35B in dual case $ 159 

2-40tk DS 3.5" FD-35B"s in dual case 259 

1-80tkDS3.5" FD-35F in dual case 179 

2-80tk DS 3.5" FD-35Fs in dual case 289 

40tk Single Side full size TM100-1 149 

40tk Double Side full size TM 100-2 159 

1 -40tk SS half-high FD-55A in dual case 1 29 

2-40tk SS half-high FD-55A's in dual case. . . .219 

1-40tk DS half-high FD-55B in dual case 139 

2-40tk DS half-high FD-55B's in dual case . . .259 

1-80tk DS half-high FD-55F in dual case 159 

2-80tk DS half-high FD-55F's in dual case. . . .279 

FREE TRIAL OFFER 

Use your Aerocomp hardware product for up to 14 days. 
If you are not satisfied for ANY REASON (except misuse, 
damage or Improper handling), return it (insured) in the 
original shipping container for a full purchase price refund, 
less shipping. Sony, ttila offer does not apply to 
software. Defective software will bo replaced. Any 
hardware/software specials wM be prorated and the 
software wW be charged at the regular unbundled price. 
We have confidence In our products and we know you wM 
be satisfied. 

WARRANTY 

We offer a one year warranty on parts and labor against 
defects in materials and workmanship. In the event service 
becomes necessary for any reason you will find our service 
department fast, friendly and cooperative We want to keep 
you happy. Out of warranty repairs are also available. 

100% BURN-IN and TEST 

AN our products are bumed-in and tpty tested prior to 
shipment. We want you to receive an item ready-tc-go. 
AEROCOMP means reliability! 

ORDER NOWI 

Call our toll-free number service and place your order. Have 
your American Express, Mastercharge or Visa number 
ready We wM not charge your card until the day we ship 
your order. You may order by man using your credit card, 
check or money order. Personal and company checks are 
welcome and cause no shipping delay as long as they are 
bank printed and the signature exactly agrees with the 
name printed on the check. We will ship surface COO with 
no deposit but all COO's require cash or a cashier's check 
on delivery. Texas residents add 6% State Sales Tax. No 
tax collected on out of state shipments. Canadian 
addresses add $20 to your order if over $550 for customs 
documentation. 



TRS-80 Model III & 4 

DISK CONTROLLER 

and 

DRIVE KITS 

Convert your cassette Model III or 4 to 
disk operation with one of our complete 
kits. You receive our own advanced disk 
controller board with gold plated edge 
contacts capable of 4-drive operation; 
our own power supply; plated steel 
mounting towers complete with RFI 
shield plus all the cables and hardware 
necessary. Detailed instructions are 
included. All you need is a screwdriver 
and a pair of pliers. System kits come 
with 40 track single-side drives or just 
order the basic kit and pick the drives 
you want from the selection in the next 
column. 

CONTROLLER KIT $ 199 

(Everything you need - less drives and DOS) 

1 DRIVE SYSTEM 299 

2 DRIVE SYSTEM 399 

Substitute DS drives for only $10 each 
Add $9 shipping & handling 

Model 3 TRSDOS 1.3 disk/manual 25 

Model 4 TRSDOS 6.2.x disk/manual 20 

LDOS5.1.4disk/manual 69 

NEWDOS 80 version 2.0disk/manual 99 

CP/M 2.2 by Montezuma Micro 169 

No S a H charge when ordered with kit 

MOUNTING KIT AND POWER 

SUPPLY ONLY 95 

Add $8 shipping and handling 

DISK CONTROLLER ONLY 110 

RS-232 BOARD & KIT 69 

Add $4 shipping and handling 

OUR FAMOUS 

MODEL I STARTER 

PACKAGE 

If you have a Model I and an Expansion Inter- 
face this is what you need to get started with 
disks. Included is one 40 track single-side disk 
drive complete with matching silver case and 
power supply, a 2-drive cable, a TRSDOS 2.3 
disk operating system and TRSDOS manual 
plus all insurance and delivery charges to your 
door (lower 48 states). 

Yours for only $ ' •* ** 

LDOS 5.1 .4 disk/manual 69 

NEWDOS 80 version 2.0disk/manual 99 

You can add our renowned "DDC" double 
density controller to either the Radio Shack or 
the LNW Expansion Interlace for 80% more 
storage capacity on your drive. Order it at the 
same time as our starter package above and 
we'll pay the shipping. Go ahead, you deserve 
increased density. See the opposite page for 
the latest technical details. 

$89 

When purchased with Starter Package 



call toll-free 
800-527-3582 usa 
800-442-1310 texas 

For inquiries or information 
call 214-339-8324 

AE3GCGfilP 

Redbird Airport, Bldg. 8 

P.O. Box 24829 

Dallas, TX 75224 
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Continued from p. 34 

Hyperzap also lets you inspect and 
modify memory with string searches. 
CRC calculations, memory modifica- 
tions, block moves, block fills, and block 
comparisons. 

Hyperzap generates self-booting disks 
for either a Model I, III. or 4. Also, you 
can put any combination of I. III. or 4 
programs on a self-booting disk, useful 
for anyone distributing Model I and 
Model III/4 versions of a program on a 
single disk. 

Hyperzap supports a feature called au- 
topilot, a do-file mimic for building files 
of multiple keystrokes. Once you build 
an autopilot file, or use one of Hyper- 
zap's 17 files, you can pass control to Hy- 
perzap and all program prompts will be 
answered by the autopilot file. 

Drawbacks 

While all of the above may sound great. 
I found a number of serious problems with 
Hyperzap. The 39-page manual provides 
a good explanation of Hyperzap "s many 
features, but it doesn't explain disk for- 
mats and structures. 

Also, entering data with Hyperzap is a 
confusing hodgepodge. Many program 
prompts require a leading zero for sin- 
gle-digit numeric values. Others require 
only a single digit and produce incorrect 
results if you add the leading zero. While 
you can put most numeric responses in 
either decimal or hexadecimal format, 
some prompts accept only decimal or 
hexadecimal values. To aggravate the 
situation further, incorrect responses 
can sometimes crash the program. 

Since Hyperzap runs independently of 
a disk operating system, it uses its own 
device driver routines. While the video 
and printer drivers function properly, 
the keyboard and disk drivers exhibit a 
few glitches. The keyboard driver 
doesn't provide enough debounce. so the 
keys repeat slowly. And the disk driver 
hangs up completely whenever you try 
to access a diskless drive. 

My first copy of Hyperzap indicated I 
had numerous CRC errors on disks that 
I could format without problem with 
other operating systems. Hypersoft sent 
me another copy of Hyperzap that 
worked fine. 

Conclusion 

Hyperzap offers several unique fea- 
tures for a zap utility, but the program's 
problems make it difficult to use. If Hy- 
persoft corrected Hyperzap's weak- 
nesses. I would give the program much 
higher marks. But I found the inconsis- 
tent data entry requirements confusing. 
With a little refinement. Hyperzap 
would be an excellent product. Until 
then, I can only consider it fair. ■ 



Multilingual 
MULTIDOS 80/64 

by Thomas L. Quinary 

• ••* 

MULTIDOS 80/64 runs on the Model 4 
(64K) and requires one disk drive. 
AlphaBit Communications Inc., 13349 
Michigan Ave., Dearborn, MI 48126, 
313-581-2896. $99.95. 
Easy to use: ***■&•& 
Good docs: * * * •& •& 
Bug free: * * * * ■& 

Does the job: * * * ir it 

As any of its fans know. MULTIDOS 
reads and writes practically any 
Model I/III DOS format. The Model 4 ver- 
sion of MULTIDOS, 80/64. extends this 
feature to include TRSDOS 6.X. MULTI- 
DOS 80/64's main advantage, however, 
is its ability to run Model I/III Basic pro- 
grams in Model 4 mode without conver- 
sion, at the Model 4's faster processing 
speed and 80-character screen width 
(unless the program uses machine-lan- 
guage subroutines or PEEKs or POKEs). 
Like other versions of MULTIDOS. 80/ 
64 tou'.s its ability to read all disk for- 
mats for the TRS-80 series. While MUL- 
TIDOS can directly read some DOS 
formats (like LDOS), you have to use a 
program called VFU to convert TRSDOS 
1.3 programs to another drive to run 
them. Several Model I DOSes require 
that you change the disk's data address 
marks with the MULTIDOS Convert/ 
CMD program. As with other versions of 
MULTIDOS. 80/64 can read all TRS-80 
disk formats. It also writes to most for- 
mats, but not to TRSDOS 1.3 and 2.3. 

Compatibility 

MULTIDOS Basic uses tokens identi- 
cal to those in Model I/III Basic, but 
TRSDOS 6.X Basic uses different to- 
kens. Therefore, you must save Model 4 
Basic programs in ASCII format before 
MULTIDOS can read and run them di- 
rectly from a TRSDOS 6.X disk. 

MULTIDOS's Basic interpreter. Super- 
Basic, comes with enhancements to 
standard Basic and debugging tools. You 
can trace, single-step, set breakpoints, 
and review variables in Basic programs. 
You also get a string sort similar to that 
in TRSDOS 1 .3 Basic, with output in as- 
cending or descending order. 

Additional Basic commands include 
Label. Erase. Zero. Hex. Binary, Call, 
and WPEEK. Erase removes a variable 
array from RAM. Zero sets all elements 
of the array to zero. WPEEK PEEKs at a 
2-byte value (word) that an integer 
points to. Some of these SuperBasic 
commands conflict with those in 
TRSDOS 1.3. 



MULTIDOS Features 

While MULTIDOS 80/64's compatibility 
with Model I/III Basic programs is good, it 
is a Model 4 operating system. It resides in 
RAM and loads its Basic interpreter in low 
memory. Because of this, you can't run 
most /CMD files written for the I, III. or 4. 
MULTIDOS also doesn't support the RAM 
calls most commercial software packages 
use. For instance, I couldn't run Scripsit, 
LeScript. or Allwrite. Some commercial 
machine-language programs can access 
most features, but not all. 

If you have a 128K Model 4. MULTI- 
DOS lets you partition the extra memory 
bank as a Memdisk; you can also set 
aside part of high memory as a RAM disk 
or data disk. MULTIDOS provides a MIN- 
IDOS function accessible at all times, 
even while running a Basic program. It 
includes commands you can run before 
returning to the program. You can copy, 
kill, or list specified files: display a direc- 
tory; invoke a debugging program: and 
select the 64- or 80-character screen 
widths (32 or 40 characters in enlarged- 
character mode). 

Other useful commands available 
from DOS include an Unkill command 
and linking and routing commands. 
MULTIDOS's utilities let you assign 
function-key characteristics, edit glob- 
ally in Basic, zap disks, time disk drives, 
filter printer codes, spool printer data, 
test memory, and scan/search memory 
for 8- or 16-bit codes. 

MULTIDOS supports double-sided 
disk drives, but the manual provides no 
instructions for making a double-sided 
MULTIDOS system disk. 

You can also format, read, and write to 
the reverse side of a double-sided disk as 
though it were a separate drive. Each 
side acts as an independent disk with its 
own directory: you refer to a two-drive 
system's four "drives" as 0. 0'. 1, and 1'. 
However, you have to configure MULTI- 
DOS to recognize double-sided disks. 

Docs and Knocks 

The MULTIDOS manual is tough to get 
through. While it offers good technical 
information, you have to hunt all over 
for it. And I found the way it handles the 
different systems confusing. 

I discovered only one error with 
MULTIDOS. The Memdisk X command 
is supposed to reset the Memdisk or 
RAM disk previously set, but I couldn't 
get it to work. 

Conclusion 

While MULTIDOS 80/64 isn't fully 
compatible with Model I. III. or 4 pro- 
grams, it does have some features you 
can't find anywhere else. MULTIDOS 80/ 
64 has utility for a select audience and 
you may Just be one of them. ■ 
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Typitall: A 
Scripsit Alternative 

by David Dal ton 
• ••• 

Typitall runs on the Models I. Ill (48K) 
and 4/4P (64K) and requires one disk 
drive. Howe Software, 14 Lexington Road. 
New City. NY 10956, 914-634-1821. 
$129.95. With spelling checker. $179.95. 
Easy to use: ir ir ir ir it 
Good docs: * ir ir ■& it 
Bug free: ir ir ir it ir 

Does the job: • • • •& -fr 

If you're a Model HI Scripsit user who 
has moved up to a Model 4, you'll 
probably like Typitall. an inexpensive 
and capable word processor. 

While Typitall uses some of the Model 
4's extra features, such as the 80-column 
screen and the function keys. It doesn't 
use the extra memory available with 
128K systems. Under TRSDOS 6.X, Typ- 
itall holds only 4 IK of text. It also doesn't 
use the Model 4's reverse video to high- 
light text, as SuperScripsit does. 

Features 

Typitall adds some important features 
missing from Model I/III Scripsit. You 
can send special codes to the printer, for 
example, and execute DOS commands 
from within the program. You can even 
exit to DOS, do a few chores (such as for- 
matting a disk), and return to Typitall 
with your text intact. 

Typitall calls help files at the touch of 
a key, and updates a status line at the 
bottom of the screen after each key- 
stroke. It displays the current line num- 
ber, the length of the line, the line width, 
the document length, and the amount of 
free space in bytes. 

Inserting new text within old was al- 
ways a pain with Scripsit. Typitall 
makes it easier with the function keys. 
Fl opens a line for inserting text. F2 de- 
letes one character, and F3 rejoins lines 
after an insert. You use control-M to 
switch back and forth between over- 
strike and insert mode. 

You print files to the screen or to a disk 
file. Printing to the screen lets you check 
your format without wasting paper. You 
can also print to the screen using small 
graphics blocks instead of text, which 
will display how the pages will look. 

One nice Typitall feature is its printer 
spooler. You can save a document to a 
disk file and have Typitall print the file 
while you work on something else. Typ- 
itall has some limitations here, though. 
It may ignore your keystrokes while it 
goes to the disk for the next block of text 
to print, and a noticeable system slow- 



down signifies that you're using the 
spooler. Printing from TRSDOS's Mem- 
disk isn't as slow. 

Customizing 

You can modify many of the pro- 
gram's features and parameters and 
save them to disk permanently. You can. 
for example, change the rate at which 
keys repeat or set up a default file name 
extension. 

You can also set up printer parame- 
ters, such as whether your printer ex- 
pects line feeds, and send command 
strings to reset the printer each time you 
print a file. Typitall's printer support is 
good, but it doesn't support proportional 
spacing or serial printers. You can set up 
sequences of keystrokes and save them 
permanently. Thereafter, you can call 
often-used command routines or char- 
acter strings with one keystroke. This is 
a good way to save printer-control lines 
that you use frequently. 

To give you more room for your docu- 
ments, Typitall uses several overlays. 
That means that only part of the program 
resides in memory at any one time. If you 
want to print a file. Typitall reads the 
printing overlay from disk, as it does the 
help files. You can circumvent this proc- 
ess by copying the overlays and help files 
to Memdisk and customizing Typitall so 
that it accesses Memdisk before loading 
an overlay. This makes things run faster. 

Problems 

Typitall did several weird things with 
my documents. I was unable to repro- 
duce the problem, but a couple of times 
my screen width changed of its own ac- 
cord and the text became skewed, though 
I lost none. Sometimes an invalid com- 
mand will slightly alter the appearance 
of your text at the cursor location. 

Spelling Checker 

The spelling checker, which only costs 
an extra $50, contains about 29,000 
words. It's slow, awkward to use, and the 
size of the document that it checks is lim- 
ited by available memory. The checker 
sorts your document to make a list of 
unique words, looks up the words in the 
dictionary, and drops them into a block at 
the top of your file. You use a Hunt com- 
mand to find each misspelled word in your 
document. You can add to the dictionary 
and create your own special dictionaries. 

Conclusion 

Typitall lacks the power of Super- 
Scripsit. the pizzazz of LeScript. and the 
class of All write. But not everyone can 
deal with Allwrite's price tag or Super- 
Scripsit's complexity. This isn't the ul- 
timate word processor, but a valid alter- 
native to Scripsit. ■ 



WordPerfect 4.0 

• •*•• 

WordPerfect 4.0 runs on the Tandy 
1000. 1200. and 2000 (256K), requires 
two disk drives and MS-DOS 2.X. Satellite 
Software International, 288 W. Center St., 
Orem, UT 84057. 801-224-4000. $495 
(includes mail-merge and spelling 
checker with 100.000-word dictionary). 

I described Microsoft Word 2.0 as a 
"first-strike thermonuclear word proces- 
sor" (August 1985. p. 114). However. I 
forgot that superpowers come in twos. 
WordPerfect 4.0, like Word, is an awe- 
some program built for high-volume 
professional writing that is wasted on oc- 
casional correspondence. In many ways, 
it's even mightier than its Microsoft rival. 

Most of WordPerfect's advantages in- 
volve extra convenience. It's not copy- 
protected (which I appreciate after 
seeing my one legal copy of Word disap- 
pear in a hard disk crash) and it can au- 
tomatically save your file at specified 
intervals. The spelling dictionary is big- 
ger. It can not only format columns of 
text but also add columns of numbers. 
And the screen display shows the page 
and line position indicator that Word 
inexplicably forgot. 

But, WordPerfect isn't as dazzling in the 
"what you see is what you get" depart- 
ment: There's no on-screen justification 
or multiple windows, and less virtuosity 
at mixing dozens of fonts for a laser type- 
setter (though you can install up to five 
printers instead of the usual one). And it 
doesn't have an undelete function. 

Compared to Word's layered alpha- 
betic menus, WordPerfect's 40-plus 
commands (all done with the function 
and control, alternate, and shift keys) 
take extra memorization. The manual, 
while first-rate, is useless without the 
supplied function-key template. 

With the color-coded template before 
you. you'll fly through mountainous pa- 
pers or reports. Some programs can't 
print footnotes: WordPerfect automati- 
cally numbers and formats notes up to 
16,000 lines long, not to mention doing 
indexes, tables of contents, and Think- 
Tank-style outlines. Some auxiliary pro- 
grams such as SuperKey allow multi- 
keystroke macros and file access pass- 
words; WordPerfect has them built in. 

Once you turn off its automatic hy- 
phenation (it brings winged thoughts to 
a screeching halt a dozen times per 
page), WordPerfect will quickly and un- 
obtrusively do any word processing job. 
Microsoft Word is flashier (on-screen 
boldface italics edited with a mouse), but 
WordPerfect is an unbeatable power- 
house. It's expensive, but definitive. 

—Eric Grevstad 
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Telecommuter 

• •••• 

Telecommuter runs on the Tandy 
1000, 1200, and 2000 (256K) and re- 
quires one disk drive and MS-DOS 2.X. 
Sigea Systems, Inc., 19 Pelham Road, 
Weston. MA 02193. 617-647-1098. 
Write-It $125. XModem $200. Standard 
$200. Deluxe $300. Plus $400. 

Telecommuter is an enhanced version 
of a program called Remote Control, 
which 80 Micro reviewed in June 1985 
(p. 113). As with Remote Control, Tele- 
commuter provides a direct link be- 
tween the Model 100/200 and a remote 
Tandy 1000/1200/2000 (which needs an 
auto-answer modem). You can access 
your PC over the phone to execute file 
transfers, DOS commands, and print 
documents, and even run programs. It is 
a significant enhancement for those who 
travel or use a portable when away from 
their PCs. 

The different versions of Telecommuter 
are built around the same core program. 
Write-It only provides word-processing 
and fast file transfers. XModem includes 
protocol file transfer with the TEI.COM 
mode. The Standard Telecommuter in- 
cludes TELCOM and a host mode, and De- 
luxe provides access to the DOS and a 
multiple access level host mode. Tele- 
commuter Plus has all the features of the 
other versions in one package. 

The TELCOM mode is similar to the 
Model 100's, and there is a fast file trans- 
fer mode. The text processing mode uses 
many of the same commands as the 1 00/ 
200's Text. 

Telecommuter is better than the Re- 
mote Control program: The null modem 
cable is now sturdier and longer; there is 
single key redial in TELCOM mode from 
the PC; you have the option to automati- 
cally run application programs upon log- 
on in host mode; and there is a simulated 
sign-off if you lose your connection. 

Also, text processing is more versatile. 
You can now append files to existing 
ones, or take them from disk and place 
them in text. You can divide large jobs 
into a series of small ones by using a 
command file to call files to be printed. 
You can write and print form letters. You 
can send printer output to the screen for 
preview or to a disk file. 

Telecommuter can automatically 
sense whether you have a monochrome 
or color graphics board, but there is only 
one choice of display colors. 

What was a very good manual is now 
even better. It has been split into two 
books, one for setting up and word pro- 
cessing, the other for telecommunica- 
tions. The documentation leads you 
through the system, with many exam- 
ples. Also enclosed are two reference 



cards with the communications and 
word processing commands. 

Telecommuter links your 100/200 and 
your PC, giving you access to the PC's 
power while retaining your lap-top's 
portability. 

—Thomas L. Quindry 



How to Use Your 
Radio Shack Printer 

**** 

By William Bardin Jr. 204 pp. Softcover. 
Tandy/Radio Shack, One Tandy Center, 
Fort Worth. TX 76108. Radio Shack Cat- 
alog #26-1242. $14.95. 

If you use any of the Radio Shack 
printers, whether it's a dot-matrix, 
daisy-wheel, or printer-plotter, then you 
need How to Use Your Radio Shack 
Printer. This book has an enormous 
amount of information, which at times 
is overwhelming. While it isn't thorough 
enough in some areas, no other source is 
as helpful for Radio Shack users. 

This book covers all the printers car- 
ried by Radio Shack at the time it was 
printed: the CGP-1 15 and 220: the DMP- 
100. 1 10, 120, 200. 400. 420. 500. 2 100, 
and 21 OOP; the DW I. II. and IIB; the 
DWP- 210 and 410; the LP 1. II. III. IV. V. 
VI. VII. and VIII; the QP I and II; the TP- 
10; and the Plotter/printer. 

The later printers, such as the DMP- 
105. aren't included, but Barden notes 
that the newer printers can emulate at 
least one of the printers in the book. 
Even if your printer isn't listed, you can 
still use the book. 

The book contains 12 chapters orga- 
nized into three sections: Printer Basics, 
Printing Text, and Printing Graphics. 

Printer Basics takes a brief look at the 
Radio Shack printer line, how printers 
form characters and communicate with 
computers, characters printed, simple 
programs for underlining and graphics, 
and a master index on the abilities of the 
various printers. 

The next three chapters deal with 
printing text, first with normal text and 
simple word processing, then word pro- 
cessing functions such as wordwrap, 
justification, and proportional spacing. 
The last chapter in this section deals 
with such uses as mail labels, boilerplate 
form letters, and screen-printing text to 
your printer. 

The final section tackles graphics: nor- 
mal, screen, and creative printing. Nor- 
mal printing uses the printer's built-in 
graphics characters to make boxes, graph 
forms, butterflies, and large characters. 

The chapter on creative graphics shows 
you how to design characters and create 
pictures with direct dot-addressing. 



There's even a short section on using 
daisy-wheel printers to make graphs us- 
ing the period and other characters. 

Barden's book is well written, with 
many examples and dozens of printer 
hints. The hints are placed into sidebars, 
and give information about such things 
as the impression level and ribbon feed 
in daisy-wheels, or generating Japanese 
Kana symbols with the LP VIII and DMP- 
200. 400. 420. and 500. 

The book's major fault is that it 
attempts to cover everything, while 
not providing enough in-depth informa- 
tion about any one printer. You need 
your printer manual and this book side- 
by-side. 

One other limitation is that there aren't 
enough examples. This is especially true 
in the discussions on graphics. 

Despite its problems, this is one book 
you should have if you own a Radio 
Shack printer or want to write programs 
that use standard Radio Shack printers. 

—Terry Kepner 

PRO-X-FTS 

***** 

PRO-X-FTS runs on the Model 4/4P 
(64K). and requires one disk drive and 
an RS-232. Misosys Inc.. P.O. Box 239, 
Sterling. VA 22170-0239. 703-450- 
4181. $24.95. 

PRO-X-FTS is an XModem file transfer 
utility for making error-free transmis- 
sions between computers. It's not a full- 
featured telecommunications program. 
Instead, it's meant to be used along with 
a program such as COMM, which is sup- 
plied with TRSDOS 6.X.X. 

XModem, the Ward Christensen proto- 
col for error-free file transfer, is a de facto 
standard, and you can use it to download 
thousands of public domain programs. 

If you use TRSDOS 6.2. you execute 
PRO-X-FTS from within your commu- 
nications program by pressing clear/ 
shift/0. With other DOSes (6.0. 6. 1 . DOS- 
PLUS IV). you must exit your commu- 
nications program, invoke PRO-X-FTS, 
and return to the program once the file 
transfer is complete. 

I used the program on a Model 4 running 
TRSDOS 6.2 to transfer a few programs 
from my Compaq, and it worked well. 

The PRO-X-FTS utility is well worth 
the price, and makes error-free transfers 
easily, either locally between computers 
or from bulletin boards. I always won- 
dered why the authors of TRSDOS and 
LDOS omitted XModem from COMM. 
Without it. LCOMM and COMM are only 
half the communication programs they 
could be. PRO-X-FTS makes them what 
they should be: useful. 

—Gary Shade 
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LET THE SOURCE BE WITH YOU 



> 



TANDY 1000 W/2 DRIVES $875.00 

Tandy 1000 w/1 Drive & 10 meg Hard Drive $1439.00 

Model 4D w/2 Double Sided Drives $ 899.00 

Tandy 1200 HD $1549.00 

IBM PCXTw/256K. and Two DS Drives $1795.00 

IBM PCXT w/ 256K. One DS Drive & 10 meg Hard Disk $2495.00 

Color Card for IBM. TAND 1200 or Any IBM Clone $ 130.00 

128K Upgrade for Model 4D Installed $ 50.00 



ONF. YKAR WARRANTY ON TEAC DISK DRIVES 

FD55B 40/40 trk DSDD bare $ 99. 00 

FD55F 80/80 trk DSDD bare $1 15.00 

Tandon 40/40 trk bare $115.00 

8" Dual slimline case & power $ 95.00! 



ONE YEAR WARRANTY ON TEAC 



FD55B 40/40 trk w/case & power supply $144.00 

FD55F 80/80 trk w/case& power supply $160.00 

Fullsize case & power supply $ 45.00 

Slimline case & power supply $ 45.00 

Dual slimline case & power supply $ 55.00 



PRINTERS 



EPSON 

LX80 $239.00 

FX85 + $375.00 

FX185 + $549.00 

RX100 $399.00 

LQ1500& interface $995.00 

JX80 $595.00 



STAR 

SG10 $239.00 

SG15 $379.00 

SD10 $375.00 

SD15 $475.00 

SR10 $560.00 

SR15 $640.00 

Radio Shack Printers Call for price 

Radio Shack, IBM, TI, & Sanyo printer cables $21.99 

Printer paper 20* 2700 sheets $25.00 

Epson 80 series ribbon $8.00 Epson 100 series ribbon $10.00 



DAISY WHEELS 

Sanyo PR5000 $ 345 

Epson DX10 $ 275 

Star Powertype $ 315 

DWP220 $ 449 

DWP510 $1075 



.00 
.00 
.00 
.00 
.00 



MODEMS 

ANCHOR EXPRESS 

300/1200 baud (Hayes compatible) $249.00 

ANCHOR MARK X 

300 baud (Hayes compatible) $115.00 

Volksmodem 12 & cable 

300/ 1200 baud auto/ansau/dl $205.00 

Hayes 300 baud $159.00 

Hayes 1200 baud $395.00 

Volks modems & cable $ 69.00 



PERIPHERALS MONITORS 

Teknika hires, color monitor $310.00!! 

Comrex green or amber monitor $ 95.00 

Zenith green or amber monitor $ 95.00 

MISCELLANEOUS 

256K chips 150NS $ 4.50 

64K 150NS memory chips $ .99 

Power strip w/surge protection $25.00 

Bulk diskettes pack of 10 $10.00 

Verbatim diskettes pack of 10 $20.00 



Visit our two 
retail locations at: 

886 Ecorse Road 

Ypsilanti. MI 48197 

(313) 426-5086/(313) 482-4424 

or 

111 Marshall Street 

Litchfield, MI 49252 

(517) 542-3280 

(517) 542-3939 

(517) 542-3947 



DISPLAYED 



'N/ideo 




IMMEDIATE DELIVERY 
DEALER INQUIRIES INVITED 



TO ORDER: Call (313) 426-5086 or (313) 482-4424 or (517) 542-3280 

(517) 542-3939 or (517) 542-3947 

OR WRITE: DISPLAYED VIDEO. Ill MARSHALL ST., LITCHFIELD, MI 49252 

OR 886 ECORSE RD., YPSILANTI, MI 48197 TRS-80 is a trademark of the Tandy Corporation 

* IBM Is a trademark of International Business Machines 
Prices & Specifications subject to change without notice 
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NEW FROM 80^ 



MICRO 




Tell 



GET THE ATTENTION 
YOU DESERVE 

more than 200,000 dedicated, interested 
TRS-80 users about your product or service with an 
efficient and economical 80 Micro classified ad. 

You'll reach the most people in the market for 
the least amount of money! 

With 80 Micro's well-established audience of 
involved buyers, sellers, and swappers, your ad is 
bound to get fast results! 
For more information, write to: 
80 Micro 
Attn. Classified Manager 

80 Pine Street 
Peterborough, NH 03458 
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Reader Service Number Page 

475 A-1 Computer Paper Company 129 
82 Aerocomp 122, 123 

215 Alcor Systems 51 
136 Allen Gelder Software 146 

30 Allwrrie 10 

476 AlphaBit Communications. Inc. 26 

17 Alpha Products 13, 15 
276 Alpine Data Services 121 
374 ALPS 57 
141 Anitek Software Products 23 
319 Applied Creative Technologies CM 
383 Astro-Star Enterprises 111 

1 52 BCCOMPCO 99 

300 Bi-Tech Enterprises Inc 105 

315 Bible Research 152 

186 Blue Ridge Software 147 

328 Compco 129 

86 Computogic Corp 147 

133 Computer Discount ot America 118 

357 Computer Fnends 1 1 1 

326 Computer Options Radio Shack 139 

18 Computer Plus 141 
532 Contract Services Associates 93 

45 Cornucopia Software 1 

239 D & A Research 129 

539 Desert Sound Inc .63 

282 DFW Computer Center 46. 47 

536 DHA Systems 119 

204 DiskCount Data .7 

62 Displayed Video 127 

91 Dotwriter 9 

452 Dresselhaus Computer 119 

216 E.A.P Co 72 
85 Educational Micro Systems 75 

BO Micro 

Back Issues 115 

Christmas 80 

Classified 128 

549 Classified Ads 151 

Dealer Sell 99 

Foreign Dealers . 89 

Load 80 Subscription 64. 65 

Subscription 117 

Subscription Problems 115 

Toll Free 115 

University Micro 152 



Reader Service Number Page 

45 Electric Webster 1 
134 Elek-Tek 101 
181 Envision Design 99 
178 EZWare Corp 62 

214 Ft Worth Computers 60. 61 

295 GT Enterprises 1 1 1 

185 Gooth Software 121 

9 H 4 E Computronics CIV 

9 H & E Computronics 67 

9 H & E Computronics 109 

455 Hard Drive Specialist 145 

355 HDP 89 

175 Howe Software 35 

46 Hypersoft 79 
373 Inmac 107 
109 Instant Software 143 
401 InteUftech Corp (ITC) 42 
101 J & M Systems, Ltd CHI 
126 JMG Software International 70 

126 JMG Software International 2, 3 
534 Jameco Electronics 79 
516 James Halstead & Assoc 129 
331 K Soft 104 

Langley-St Clair 63 

339 Logical Systems 32 

250 Marymac Industries Inc 106 

363 MiCom 95 

464 Micro Labs Inc 149 

488 Micro-Link 104 

514 Micro Malnlrame 140 

137 Miller Microcomputer Services 81 

411 Montezuma Micro 36. 37 

416 Montezuma Micro 90. 91 

424 Montezuma Micro 77 

281 Nibble Notch 133 

232 Nocona Electronics 103 

352 Northeast Peripherals 100 

95 Northwest Computer Algorithms 100 

127 Noteworthy Software. Inc 57 
36 Omnisoft Research 83 

151 Orion Instruments 105 

470 PG Design Electronics 119 

207 Pacific Exchanges 115 129 

200 Pacific Software 

Consultants 55 

324 Pel/Tek 140 



Reader Service Number Page 

124 Perry Computers 20 

176 Personal Computer Products 137 

440 Personal Integrated Computers 27 

290 Pickles & Trout 56, 129 

432 Pivar Computing Services Inc 129 

437 Portable Software 100 

108 Powersoft 18, 19 

308 Powersoft 4 

249 Press A Software 136 

76 Producer. The 24 

174 Professional Tax Software 137 

449 Prolessor Jones/Frogg House 150 

30 Prosoft 1 1 

512 Rockware Data Corp 50 

56 Ross Custom Electronics 148 

203 Scientific Engineering Labs 129 

371 Seatromcs 150 

503 Severts-Zorrnan Eng. 135 

272 Simply The Best Software 129 

430 Softech Information System 133 

Software Support 96, 97 

427 SOTA Computing Systems Ltd 78 

525 Spectrum Holobyle 28 
386 Statewide Microelectronics/ 

Digital Disks 85 

71 Sublogic Communications 121 

150 Summit Software Technology Inc. 89 

285 Sun Research. Inc 120 

456 Sunlock Systems 62 

266 T/Maker 73 

472 TNT Software 139 

211 T Soft 82 

189 Tab Sales 136 

347 Talley Communications 79 

81 Total Access . .71 

227 Tnsofl 1 35 

530 Zedcor 45 

For further Information from our advertisers. 

please use the Reader Service card 

"This advertiser prefers to be contacted directly 

Advertising Sales (603) 924-7138 

or (800) 441-4403 

West Coast Sales (415) 328-3470 



128 • 80 Micro, December 1985 



Circle 432 on Reader Service card 



Circle 203 on Reader Service card 



Circle 328 on Reader Service card 



Conversion Services 

Any 9 track 1600 BPI MAG- 
NETIC TAPE converted to: 

Tandy Models I, III, 4/1000, 
1200, 2000, 11/12/16/6000, 
MS/dos, TRSdos, Xenix 

8-CP/M OS/6 WANG 

IBM SYS/?? Display WR iMICOM 

Macintosh APPLE ZENITH 

IBM PC TELEVIDEO KAYPRO 

MORROW NORTHSTAR XEROX 

ALTOS Many others 

Disk to disk and disk to tape conversions for 
over 300 formats available. 

Pivar Computing 
Services, Inc. 

47 W. Dundee Rd. 

Wheeling, IL 60090 

(312)459-6010 



Ci'Cle 516 on Reader Servn 



• SAVES YOU HOURS PROGRAM 
MING. 

• PROCESSES ANY LANGUAGE 

(ASM. BASIC, C, COBOL. PASCAL. 
I TC) 

• PRETTY PRINTS PROCRAM 

SOURCE 

• CROSS-REFERENCES CONCUR- 

RENTLY: VARIABLES. VALUES, 
KEYWORDS, LINE NUMBERS 
AND/OR LABELS. 

• FAS1 ANDFLEXIBU UTILITY. 

• SOURCE CODE & EXAMPLES INCL 
SPECIFY MSDOS. TRSDOS. OR 

CPM ONLY $39 

JAMES HALSTEAD & ASC. 
1551 PLAINFIELD, 

JOLIET, IL 60435 
(815)725-0346 




BUY WAREHOUSE DIRECT 
AND SAVE UP TO 40% 

• FAN FOLD PAPER - 70- TYPES IN STOCK 

Blank, greenbar. smooth-edge, carbonless 

• LABELS AND LETTERHEADS 

> 37 WAREHOUSES NATIONWIDE 

• NEXT DAY SHIPPING BY UPS 

on most stock items - within 3 days tor all 

SAMPLE PRICES 



9' ill 15 LB BLANK 33007 CTN 27 95 

I4,ill IB LB GREEN8AR - ZBOO/CTN 34.95 

9' ill 20 LB SMOOTH-EDGE - 2500/ CTN 28 95 

Call lor shipping charges, cish and credit card discount! 

CALL TOLL FREE: (800) 628-8736 

Open M F Ml AM* I 5PM PST In CA call [2I3| 804 I270 

A-1 COMPUTER PAPER CO. 

405 E. Third «206. Long Beach CA 90802 

SEND CARD OR WRITE FOR FREE SAMPLES 



ONE GPIB-488 
INTERFACE 

FOR ALL 

IBM PC. XT. AT. 

CLONKS. APPLE MACINTOSH. 

TANDY 2000. 1200HD. 1000 

ANY LANGUAGE 
EASY TO USE 

'fi?=- /F/ 



MODEL 488-2000 PRICE $675 

♦ SHIPPING INSURANCE & TAX 
UTirn utdenng sp«i/y compuirr for pmper cahir. 

Scientific Engineering 
Laboratories 

11 Neil Drive • Old Bcthpage. NY 11804 
Telephone: (516) 694-3370 



Circle 207 on Reader Service card 



wabash 

When it comes to 

Flexible Disks, nobody 

does it better than 

Wabash. 

MasterCard. Visa Accepted 
Call Free (800)235-4137 




PACIFIC 
EXCHANGES 

100 Foothill Blvd 
San Luis Obispo C A 
9.1401 (InCal call 
(8051 543- 10.17 



Ci'de 238 on Reader Service card 



DIGITAL and ANALOG 
I/O PORT KITS 

Parallel 8 bit Input & Output 
for your Models I, III. 4 & CoCo 

•Modular design for ADDITION of multiple ports 

'LATCHED OUTPUT 

•STATUS MONITORED BY LEDS 

•SWITCH SELECTABLE I/O ADDRESS 

•SOFTWARE DIAGNOSTICS 

Complete I/O port kit (J107K) $35 
A-D/D-A Interlace (J202K) $35 

CoCo Adapter— required tor 
CoCo (J 11 OK) $15 

Model III, 4 Adapter (J112K) $20 

5 Volt Power Supply (D100K) $25 
Complete Enclosure Kit (D100E) $30 
Relay Array (J207K-8) $32 

One FREE POWER SUPPLY with every 

four I/O Port Kits Ordered! 

Add 30% for assembly. 

Send check, money order, or C O D 

D & A RESEARCH 

400 Wilson Avenue 

Satellite Beach. FL 32937 

305/777-1728 



ATTENTION Mm Owners 

Fix Your MILT Computer for Only $50!" 

Do,- Your MUI Move The Bluei? Do« it mtermrrienly 
REBOOT tOSt DAI* or CRASH lor no rnW Tin problem l> 
probobly th* Moih». Boo.d R.ploo ih.. board YOURSELF lor Iho 
co»t ol a t*rvk» call ! Anyone con do il Uting Ou Inttructbns. 

For More Info and a FREE MUI Trouble- 
Shooting guide. Send a SASE to- 



CompO 

Mountain Mall D-4 

Gatlinburg Tn. 37738 

or cdi 615-436-5189 

F' rtgs rt<m do«i net include »hipp»ng 



'de 290 or Reader Service card 




P&T CP/M 2 is easy to use. 
flexible. & reliable — and backed 
by more than 5 years of 
experience Contact: 



nm\ PICKLES « TROUT" 

Cj¥ PO B0X I206 * Goletd - CA 931 16 
WT_ (805) 685-4641 

C P/M* DIGITAL RESEARCH 



272 on Reade' Serv ce card 



Small c. compiler 

Version 2. 1 

For Your Model II. Ill, IV 

running TRSDOS © 

PRICE: $59.95, including 

Assembler & Linking Loader 



MM SPECIFY VERSION 



SIMPLY THE BEST SOFTWARE, INC. 

J 709 North Sibley Street 
Metairie, LA 70003 

OcOPYRIC.Ht HNI)> CORP 



80 Micro, December 1985 • 129 
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Circle 281 on Header Service card. 



IT'S LIKE 



FREE DISKETTES 



a 



Your 5 V single side disks are usable on the 
other side. You paid for one side, why not use 
the other... IT'S FREE! 

Nibble Notch will open your new disk. It's 
easy ..won't harm existing data. Try it, you'll 
be glad you did! 

^ nibble notch ll 

Cuts square notch and '* round "index 
hole!' For TRS 80 I, ill, and IV. Osborne, 
Tl, Kaypro, IBM and others needing 



1 



CaH, ° r . .TV 

•SSBS' 



index hole" 



$0190 



ONLY 



21 



PLUS 



•Add $2 

($5 foreign) for 

postage & handling 

FL residents 
add 5% sales tax. 

ORDER 
TODAY 



SATISFACTION GUARANTEED 

OR YOUR MONEY BACK! 

TOLL FREE 1-800-642-2536 

FL (305)748-3770, 9«m-6pm ET 

or send check 
or money order to: 





O 



computer products 



4211 NW 75th Terrace • Dept 2 03 • Lauderhill, FL 33319 



Circle 430 on Reader Service card. 



TM 



AccountMate .l/lll 



FASY EFFECTIVE Ft F XIHI I. clBASF III SOFT WAKF 
for all your accounting needs 



"I 'found Account Mate to he a high performance account- 
ing package, suitable for relatively high volume appli- 
cations requiring multiple integrated modules . . . The 
program is so well organized and well designed that it is 
almost possible to run the system without the documen- 
tation . . . 

One ol the best dBA .S'A ai counting packages available. " 
Paul Christiansen. Data Based Advisor 

"The system has a lot of functionality . . . The General 
Ledger system may be the best choice for the knowledge- 
able user, since it has much more power than other 
bookkeeping software systems. " 

John .I. Xenakis. Business Solvsare 

Kind out for >ourself why these expert reviewers were so 
impressed by AccountMate. 



The AccountMate family: 



G«n«ral Ledger 


S39S 


Sales OiOe' 


196 


Accounts Receivable- 
Billing Invoice - inventory 


295 


Punhase O'dei 


195 


Accounts Payable 


295 


Paytoli 


495 


Time & BiHing 


?95 


fund Accoont-ng 


495 


Manulactunng invento Control 


795 


VVcwfc'ng oeric 


?5 



For mote information and technical 

support, contact a dealer nearest you 

or call us at [4151 381-1011 



Order Hotline: 
800-762 7788 (California Order Only) 
800-228-8896 (Nationwide Order Only) 

Bite Sottech Information Systems. Inc 
■HlS 20 Sunnyside Avenue 

mV Mil: Vaiiey CA 94941 



dBASE II and dBASF III are trademarks o' AshtonTate Inc 

Data Based Advisor is a trademark ot Data Based Solutions 

AccountMate is a trademark ot Softech Information Systems In*' 
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Circle 227 on Reader Service card. 



CP/M-68K 

TANDY-6000 Macintosh 



You purchased a computer with an MC68000 
16/32-bit processor, one of the most powerful 
available. Now you need the software to 
make it run! 

You need a powerful operating system like 
CP/M-68K. You need full-featured compilers for 
FORTRAN-77, PASCAL, C, and BASIC. And 
you need the compatibility to run the many CP/ 
M-2.2 programs you are familiar with. 



You need 



TriSoft 

4102 Avenue G 
Austin, Texas 78751 



1-800-531-5170 
(512)472-0744 





Circle 503 on Reader Service card. 



WHEN THE U.S. ARMY 

NEEDED PROTECTION 

—THEY CALLED US! 

So did the Royal Canadian Navy, AT&T, 
Lockheed, Motorola, Clemson University 
& the entire Colorado State school system. 

ZAPSTAR™ PROFESSIONAL— the 
most advanced surge suppressor/fil- 
ter available. 

Zener Technology plus i MOV's 
provide maximum protection for 
your electronic equipment & 
data. 

LIFETIME WARRANTY. 

Exceeds IEEE standard 

The People with the 

Most to Protect-Call 

Us for Protection. At 

$79.95, Why Set- 
tie for less? 
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Circle 189 on Reader Service card. 




WHY FIGHT IT?. . .SWITCH! 

THAT'S RIGHT — Why fight twisted cables and hidden 
connectors any longer when a TABCo Switch can fix the 
problem forever! Designed & built in USA. 

SR-1 Serial A/B switch with a 
switchable Null Modem Adap- 
ter and six foot connector ca- 
bles built-in. Lines 2-6, 8, 20 & 
22 are switched. Top quality 
material and workmanship 
make this a super buy at only 

$79.95 

Model PSM-2C/P makes connecting two computers to a 
single parallel printer a snap! Just plug in your existing 
printer cables to the switchbox and connect the built-in 
six foot cable to your parallel printer and you're set. Order 
today. 
New Low Price! $99.95 

Other models available 
Dealer inquiries invited 
$2.50 Shipping/Handling 
Florida residents add 5% sales tax 

704 W. Michigan Ave. P.O. Box 8098 

Pensacola, FL 32505 Florida 904/438-6507 

OUR TOLL FREE NO. 18 

1-800-874-1551 




Circle 249 on Reader Service card. 



Hunt and Pack is fine for chickens 
but you can 




Fastype teaches you how to use the 

keyboard on your TANDY 1000 

andTRS-80.ll/4/4P. 

• Fastype is the fun and easy way 
to learn to type. 

• Fastype is machine language fast. 

• Fastype is teacher written, class- 
room proven. 

$39.95/ disk plus $1 .50 shipping. 
Arizona residents add 5% . Specify 
model. Schools: ask about our 
network version. 

Press A Software 
Box364M 
Jerome, AZ 86331 
602-634-2688 

See our 4* Review on page 119. 




136 • 80 Micro, December 1985 



~ g 



«£ UH III ■ 
— fr> 01 3*1 «■ 

CM 01 >H 4J 

,C • -U 3 131 C 



C V 01 4J ■ 

; -h a >, in <o 

I ■ «J o >,- 



DO UUH 



It) • 0.0. 

c u as — ~ 

•• 0. — . 



Cj5»|rlA«3 11 



iOoou« n at 
id au nz» « 
I U C V 0> 



01 01 

w >l 

G "J 

a 9ih 

■• ft 

"»^ JS 
•* O 

§> 1 
01 
3 
U O "O 

>.c 

4 

if?]! 



■•£,: 



<0 E 



Z ■ W 

h a 4i 



> Q. O 

C I 
Wrt 41 ' 

o in w 

3 <0 
T5t) o ■ 

>c» 
OHIM 

01 T3 



41 10 C J3 C C 



> c a >i co o>. 

T3 18 01 -U - 

« o a 4) c 



41 -H 3 3 o c 

J3 4-> O =1 M --H 



CO *J »hj<H 

I II C H - CD Id 

J3 g CD ~ K •SCO 

u 3 to o> ~ 3' 

I H-UC-PCOlOOl" 

i <u o <o s c u >,o a 



H tl >, Z CO 



11 _ 

>1" 

Ifl 0) 



m -~— tl 



E* E* 

CO Cd 
01 05 



i m .c co » 



c c 



<B 



41 O O O U » 

.C J3 O >,*> 41 T3 4J 1 

iJ U U CO *J 41 O ' 

CO Kl ~ 3 d, M 01 



I ~H « « 

i > co o 



! H « H M 

i z 3 a k 

i 05 •■< 3 Q 

10. > o •• 



S3 
*8 



» » —tt 



W WW M | 



w 



— ■■ ■• co 



t-MS 

— OS co 

a - •• 



M H CM 

« Z-w 
S M » 
- OS i-l 

H»» 

Cd * 



22 
e> Cd 
I 

Ss".~ 
u o> 



3 Ed 



a. co u io E 0> 



T«< CO 



oS z 4> 

3" p 



ZZS 
• not 
■ as> 



+ Z 2 

O.HHI 



,r~ H MSB * 
I "» Z — 'r- •• 
I HCBOVB 

'ZKBOi • 

HZ 33 en 

B Z "•E-i > 

• ■ ■ u ■ va 

ZH9«l -H 
• Poixov 

us • » 

I NlflSIri; 
«/> I V nvt 1 

f- a. o. z sh u i 

u, n. h K Dv O 



3 41 Oi a 

bog o h 

C 10 M 41 3 CJl'H 

•HCftOIOOI^HOI 

.0 >« -U-* u 

ft i 41 « » io 

O x: co • o 

i *J a EH B 4» 3 > 

I ra S ja a >i ° c 

i 4) • id G >i 4 

I 4J *J O CO CJ1 «J 



I O U U IB O UU >,£ 1) O | 
I3« -H Id 0. »ll«H I 

i cn a. co jj ft u h c x: ^ i 
:o -Huituon-ijo i 

l O -u 1J USU13 I >HI 
C — CO iJ — --! >, I 

10O COC UH 10 II I 

U O CU -rH - H OI O -HJ3I 



(0 A3 <0 ^^ 



•J3 4J - 



llt> H ~~ ~ - - 

i a h>i>i ~ ~-~ 



EH — — - t-1 CO X S IS 



41 A 



CO 



4J +J ft -, 
« ft - U I 

OiBucojsuC Di- 

ld-H QJ ±> *J 3->-4 C. 
>, C -H O U -H 

C 4J IB -H a >, Q.4J I 
O CO M M C 

t4 Q. Q. U lb| TJ- 



•o 



*«»1 

a id 
cnu ii 



. *j a 



ZUD 

M o id 
OS" ■ 

Ihfi 

- Z Z 

;mmh 
I J OS OS 
; O o. 0. 



>t co 4) 3 *j *J id 

41 w U O O co ' 

J3 *J 41 C -rt U-H 

H 3 >iO *J 41 4J 



id ft a ra oi u - 



0> 



II ■ 



;„• h ra t i 



I *J ^-* CO Qi 



I ■ ^K 

I IH — to Z ' 

i bkihi 



. n - 



Q 8i 

-h m oi 

c .-I 



'XUHH 
IQUH 

.H - co ca ; 
, x — - - 

. Cd ct. .-.,-. 

i z »><><: 
. - CO •• » 

I .-.--- !/>•*" I 

iXHas 
' ».Cd i-l pH 

i-en ta—— 

) — - f B 
: H — ai ca 



- HH< 
-— Cd Cd " 

-H CO CO I 



i ^■^cNrn t* i 



Eh si 01 ca ca i 

llj rH ~ r-l rt 

i co— m — — - 



i — mm •* co 



u o O* o. c -H 01 

OK IB O M -C U 

WQ,<dQ,O41C0Qi 



-"OS — O l 



- Cd O O i 

lOUHHI 



CO Eh f 

Id Cd 

CO O) 



,-8-"( 



O co 

JUO 
3^ 



. 9S„ 

m id O in 

\a OS e u-i 

^- - CO • 



-DHXiol 
EH Cd >- < 
oa id ecu z m c 
ci OS EH ~ m 
m - Zrt t~ > 
u-i X H >. •• 1 

OS rH- 
» CO EH Ol EH CO, 

u 3 X - Xcon 

41 CO Cd co [d » i 

£OZHZl~l 

U(9« — .h : 

Id •• QB O CH CO 

41 weo B », 

8S! 



CO c 
Id 41 

a. oi 



else 

■ cnO 

■ O 

r^ O - 
O Eh Cd 



EH Eh - Eh Eh Eh* 



t ca < , 



I P Eh T3 Eh Eh >4 , 



EhEhEHEhEhEhEHEhEhEhEhEhEHEhEhEhBHEhEhi 

zzzzzzzzzzzzzzzzzzz 
osososososasascisciiosasosasQSaSQSasasas 

0*0i0ip4Cii0.Cl.CuO40iCki040i0.0.p4P404P4 



- r* r- r^ r- r* r*- 1 



BS S.h>IHI>'>l>IHKHH 

XXcBJCCOMOlEHOSaSOSEHaSEHEH BSOS 

CdtHj U JojpuOOOUOUUWOO 
oSQ&OSUOiOuCQDuCveuCQBLiCOCOEHCvb. 



>^invor~coo\co»Hf>ir*!* 

IHHHHHHNOIClMNi 

i in in io ui ifi m in m m ui ui 



id a « o -H «> 

i q x x B N 

II Oi as ea « eh 
co-OOJI 0< 

Eh k, Iv Eh o. o 



r-l ^3 

ca~i 

JC hi 

BS" 



O 5? oi E- 
03 Cd Id Z 



Circle 176 on Reader Service card. 



Circle 174 on Reader Service card. 



Tax 
Preparers 

TaxStar 



* 



For Tandy-1000, Tandy-1200. 
TRS-80 Model 3 or 4 

• Will do schedules 1040. A, B. C. D. 
E. SE. G. W. 6251 

• Tax calculations— tabies. rates, 
income averaging 

• Uses IRS prescribed computer 
generated printouts or overlays 
User frienaly 

• Automatical y calculates excess 
FICA earned income credit, alter- 
nate minimum tax 

• Change one figure, program re- 
calculates entire tax return in 10 
seconds 

'289.95 with user manual 

Professional Tax Software, Inc. 

26 Lark Lane 

Croton On Hudson. N.Y. 10520 

(914)-271-4723 




FILE TRANSFER 

+ Conversion Utilities 

Transfers: (no more retyping) 

• Visicalc, Multiplan 

• Data Files, ASCII Files 

• Word Processing Files 

• Basic, Fortran, Cobol 

TRANSFER SERVICE: 
Call for Information 



(IBM PC/XT 

<Tandy1000, 1200. 2000 
(IBM AT 
(To/From) Tandy 2000 Disk Transporter 



149.95 
149.95 
224.95 
129.95 



w ..--i 



/ AT PRODUCTS \ n 



Disks (Top Quality) 
At Products 



DS/DD 89C ea./100 



PERSONAL 

■ COMPUTER 

■ ■PRODUCTS 



Drives 360 KB JX&fXf 149.00 

CMI40Meg. MS&dTT 1014.00 

128KRamSet JAbttT 105.00 

Prototype Board & 

Extender Cards 120/ea. 

High Capacity Disks ^4©/^tT $35/10 

Phone Orders: M&vewccD/CHecx ok 

600 621-0854 Ext. 167 



3080 Olcott Dr, Ste. 1 30B, Santa Clara. CA 95051 (408) 988-01 64 
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Circle 326 on Reader Service card. 



Circle 472 on Reader Service card. 



COMPUTER OPTIONS 

TANDY 1000 HD 

"We put our own system together to save you $!' 




/&;.\rv<m;$m\ 



* TANDY 1000 w/1 floppy 
*10MB Hard Disk (Internal) 
*VM-3 Monochrome Monitor 

♦ Deskmate 

*90 day limited warranty 



• TAMPAC Board w/640K RAM, 
serial port, clock/calendar, 
ramdisk, print spooler, more! 

•The ULTIMATE 7-in-l: word 
processing, dictionary, data- 
base, mailmerge, E-Mail. 



1,899 



|00 Complete 

Freight Extra. 

,-*AII units formatted and tested before we ship. 
*^WE SERVICE WHAT WE SELL! 

COMPUTER OPTIONS 

109 Lansing Street Charlotte. Michigan 48813 

(517)543-0030 (517)484-8883 
TANPAC is a trademark of Hard Drive Specialists 



THANK YOU! 

Due to the great success of The Creator, we 
are pleased to announce version 4.0 with a 
new 186-page manual (5" x 8"). We've added 
what you asked fort Check out the features 
listed below. Why should you pay $ 1 00 or more 
for your database program, when The Creator 
offers all this for only $45.00? 

* 28 1 6 characters/record * Up to 200 fields 



•20 key fields 



*Sort on up to 50 fields 



•32765 records/disk *9 levels of subtotals 
*200 screens/record 'Cursor addressing 

•Computational update * Mailing labels 
•Batch update/delete 'Screen formatting 
•No-nonsense 30-day money-back guarantee! 

Order your copy nowt Formats available: 
Model l/lll/IV (TRSDOS 2.3. 1 .3. 6xx) 
CP/M 2.2 (Microsoft BASIC 5.2 reqd. Specify format) 
MSDOS 2.1 for Tandy 1 000/ 1 2O0/2O0O/IBM PC 

T.N.T. SOFTWARE, INC. 

34069 Halnesvllle Road 

Round Lake, IL 60073 

(312) 223-8595 
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Circle 514 on Reader Service card. 

'and then there was one" 

MvHStrtaMiBI* MMMt W cMlw r o«Tin^lMO' , )w M to ot 9 1« o< yaw npnMin Bti M* » 9" 

I HMbk •*■, KM fw ow Bp* to MOK al UU. 1 MIA coBoltr. 1 wW port, md in oo«mhI MoMkOoct rt 

M vh arty 1 m* BL 

rOTMBhMlHM5 r «»RrMchp».youc'»Bri0t^ 

■oBk tor m.9s BBoB MB* %qukM dmrBm •) RBo SB* Mom*. CM. »ti>7 to optrB). 

1MB puctawa Bh toctory MM and tatod RAH tocluei 1 URTMI WAMUrfTY on tht RAH wd t on* (1) yw 

■mnty m m* «!• cart. 

B)1' HatiLrlT 

4N14M 4N1* md NO RAM $259.95 

4N1-12I 4N1 a and 12IK RAH $319.95 

4N1-2M 4N1* and NIK RAM $317.95 

4M1-512 4M1» and S1W RAM $515.55 

Ptoaai art MLOO tor iMppnt and BBng. and J3.50 BMeB tor COD pu r chawi. 

MM ma nam by purcBBg your on RAM. «t ofter ta RAH Ui nBd batoa m 1 amtot to IBn atw cannot M I 
tocaly. Sony, no ktoamt aamnty ■ 111B1I1 on Om RAM Us. but at do aanaaty tarn tor M day*. 
M»MMITa3THM)Iim 

■KMT MX RAM Upm* ISM 

MXiaT ISKRAMUpgnB t *0.00 

NK2S(T2Sfl( RAMUagndi t MM 

MK511T 51K RAM Uagndt $128.00 

Ptoaat aM S3 M tor atapaina •*> iMndang. and OH addtoonal tor COO pmchaau. 
HAM) HMU FM TOW TAMDY INT 

Men IHMRM hart dW kHi am MMJaj «<• boat iBtaM tor to Tinoy 1M0* conaMing on^ 

and conbrttort tottod H 1 MMMM MlMI M) awd tM to you. Wt pio«B tvarylhtog you nM n M you M^ naid 1 

cagnt in Compuiir Sctoncc to mh bmi lystoai aortt. 

rUM)MMt>WCtU«T 

MHD10T 1» MB OB aB CoBoMr MM.M 

MM0»T 21 MB OB a«i Controtor $795.00 

HMOMT M MB OB Bk OMraMr MH.M 

CALL U$ W&AR0W0 CXm MB7 UKMDI f0« Y0WI TAMDY 1000* B 
To MM* Bonaafca abeat Bar Hn Mawwat anBctt. cM a M t«B o< B ptam iwbcni Mad bahM. Wt I 

boftVoBandDBcaaaMayHiaab dim !■■■>!, ywawTrMtiiaaiwBiaraMaaii 

ttaa. 

WI ACCt»T MAtTDI CARD AND YTSA. 

■wtlasro IVlBiBni a raarB-aB> 

Ranoho Cordova, CA 95670 

B»1«B1 635-3997 
BS C»1«l 638-6175 

SMaptng cntraM Bf -x Hart OBt. CM in tor B apalcabW aMppkig and handing chargn. 
TM> taoo* a • 1-I1I1 i) I r iai M i* o< thm Tanav Corp. 

Mil' It 1 n nl Bajd bBu m w or Moo MB aam . 



Circle 324 on Reader Service card. 



1or 
Models Ojjt* 




PEL-TEKS 

UlOfd 

mochine J.O plus 

An integrated Word Processing 

and Spell Check/Correct System 

for the 

TRS-80™Mod l/lll 48K Disk System 

(and two arcade games included) 



now only 



$ 



49 



95 

complete 



See our four star review in July 85 issue of 80-Micro 

PEL-TEK ■ P.O. Box 1026 ■Southampton, PA 18966 
Toll free orde' line 1-800-523-2445. Exi 19 
m Pennsylvania call 1-800-346-7511. Ext 19 
Specify Mod I or III (Mod 4 in Mod III mode) 

Visa. Master Charge, check or money order 
Add S2.00 Postage and Handling ■ PA residents add 6°o sales lax 
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From Computer Plus to YOU . . . 

PLUS .h„ PLUS .«., PLUS 




Tandy 200 24K $739 
ModeM00 24K$510 











[tandy 






"h 


Tandy 1200 HD $1599 
10 Meg. 256K 



D 






Tandy 1000 $710 
Tandy 1000 HD $1539 




L~~~3 



Color Computer II 
w/64K Ext. Basic $179 




DMP105$160 



BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 



COMPUTERS 

Tandy 1000 1 Drive 128K 710.00 

Tandy 1000 HD 10 Meg. 256K 1539.00 

Tandy 1200 10 Meg. 256K 1599.00 

Tandy 2000 2 Drive 256K 1295.00 

Tandy 2000 10 Meg 256K 2025.00 

Model IVD 64K with Deskmate 889.00 
PRINTERS 

Radio Shack DMP-130 26900 

Radio Shack DMP-430 660.00 
Radio Shack DWP-220 Daisy Wheel469.00 

Radio Shack TRP-100 Portable 229.00 
Silver Reed EXP-550 Daisy Wheel 425.00 

Star SG-10 245.00 

Star SG-15 410.00 

Star SD-10 365.00 

Panasonic P-1091 259.00 

Toshiba 351 1175.00 

CITOH Prowriter 8510AP + NLQ 345.00 

Okidata 192 375.00 

Epson LX-80 245.00 

Epson FX-185 369.00 

Epson HS-80 Portable Ink Jet 339.00 



Tandy 1000/1200 ACCESSORIES 

Tandy 1000 Disk Drive Kit 159.00 

Tandy 1000 10 Meg Hard Drive 579.00 
Hard Drive Controller Board 249.00 

256K Ram Board (Inc. 128K & DMA) 199.00 
512K Ram Board (includes 128K) 169.00 
256K Memory Plus Expansion Brd. 249.00 
PBJ Multi-Function Board (128K) 259.00 
PBJ Multi-Function Board (256K) 279.00 
PBJ Multi-Function Board (51 2K) 299.00 
128K Ram Upgrade Kit (NEC) 78.00 

256K Ram Upgrade (for PBJ Board)69 00 
300 Baud Modem Board 129 00 

1200 Baud Modem Board 249.00 

RS-232 Serial Board 89.00 

Digi-Mouse Clock Board 89.00 

Tandy 1000/1200 MONITORS 

Tandy VM-2 Green Monitor 129.00 

Tandy CM-2 RGB Color Monitor 379.00 
Tandy VM-3 TTL Green Monitor 179.00 
Tatung CM-1360 ColorGr Amber459.00 
Tandy 1200 Text Monitor Adapt 179.00 
Tandy 1200 Color/Graphics Adapt240 00 



MODEMS 

Radio Shack DCM-3 Modem 52.00 

Radio Shack DCM-5 Modem 99.00 

Radio Shack DC Modem 2212 31500 
Hayes Smartmodem II 300 Baud 169.00 
Hayes Smartmodem 1200 Baud 429.00 
Novation J-Cat 300 Baud 115 00 

FOR EVERYONE 

Network Four Outlet Surge Prot. 69.95 
CCR-81 Cassette Recorder 52.00 

CCR-82 Cassette Recorder 43.00 

C-20 Digital Cassette Tapes (10pk) 9.95 
Verbatim SSDD Plastic Box (10pk) 24.95 
Verbatim DDDD Plastic Box (10pk) 29.95 
Generic SSDD Diskettes (10pk) 17.95 
NEC 64K Ram Chips (set of 8) 39.00 
Radio Shack 16K Ram Chips (8) 25.00 
Locking Disk Box (holds 70) 19.95 

Flip N File Disk 50 15.00 

Fanfold CleanEdge Paper (2600) 35.00 

Radio Shack software 10% off 

Send for complete listing of 

brand name software and hardware. 



CALL TOLL FREE 
1-800-343-8124 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 



com 







P.O. Box 1094 
480 King Street 
Littleton, MA 01460 



SINCE 1973 



IN MASSACHUSETTS CALL (617) 486-3193 



TRS-80 is a registered trademark of Tanay Corp 



1985 ARTICLE INDEX 



Articles are alphabetical bu author wllhin each category. Listings are In 
the lorm: author's last name, article title. issue:page. Idcbuu issue:page). 
(Computer model numbers! Description 

BUSINESS 

Garms. NovaCalc." 1:82 (7 25). (I. Ill) Full featured Bask spreadsheet. 

I.ake. Gulden, and Lett. '"Reasonable Deductions." 374. Home computer tax 

deductions explained. 
McAnaney. "Savings and Loan."" 11:83. (I. III. 4. 1000. 1200) Calculate loan 

balances by Rule of 78s. 
Terry. "Password Bypass.'" 1 1:72. II. III. 4. 1000. 1200) Crack protected files. 
Wallace. "Don't Be Late."' 6:74 [10:25). II. HI. 4. 1000. 1200) Sri up a critical 

path schedule. 

COMMUNICATION 

Dixon and Maloney. "On the Boards,"' 7:36. 1,850 BBS numbers. 
Shulman. "The Perfect Host." 9:41. (4). Use Memdisk to transfer data at high 
baud rates. 

GAMES 

Lewlckl and Karls. "Monster Mashing. " 2:50. (Ill) A Dungeons and Dragons 

type fantasy. 
Zare. "The Pecking Order." 2:59. (1. Ill) Number-crunching in a game format. 

GENERAL 

Harmon. "Mail Order Maxims." 10 8. Tips on making mail-order purchases. 
Pleacher. "Net Results." 12:52 (I. III. 41 Basketball statistics program. 

GRAPHICS 

Abbas-si.m and Sparks. "Drawing in Detail." 9:56 (III. 4) MacPaint-style high- 
resolution graphics. 

Graebner and Gracbner. "Clear Cut Trends." 4:40. (III. 4. lOOO. 1200) Create 
detailed high-resolution line and bar graphs. 

Justice. "Fractals in Focus." 5:58 (III. 4. 1000. 1200) Produces fractals in high- 
resolution detail. 

Lelbow. "Grade-A Graphics." 3:44. (Ill) A graphics editor that lets you create a 
screen, combine backgrounds, produce mirror Images, plus more. 

Retfman, "Picture This." 2:56. (Ill) A graphics program that lets you create 
designs with graphics blocks, lines, letters, fill-ins. and more. 

Rogerson. "Rembrandt Redux." 12:76. (Ill) Access screen save commands 
from Sparks' Rembrandt graphics editor (9:52) and dump screens to 
Epson printers. 

Smith. "Upgraded Graphics." 8:76. (4) Add the Point. Set. and Reset commands 
to Basic programs. 

Sparks. "Window Screens." 12:58. (HI. 4) Create high-resolution windows with 
BastcG. 

Van Beverhoudl Jr.. "By the Numbers." 2:68 (7:25). 11. Ill) Plot numerical data 
on either line or bar charts: then display the graphs sequentially with 
slide show option. 

SCIENCE 

O'Neal. "Formula Solutions." 1:1 16. (I. III. 4. 1000. 12001 Solving real or 

complex roots of equations. 
Wood. "Next-Generation Software." 1070 (I. III. 4. 1000. 12001 Re-create 

Gregor Mendel's genetics experiments 

TECHNIQUE 

Goodale. "On the Record." 1 : 106. (I. HI) Combine the best features ol sequential 
and random-access files. 

TUTORIAL 

Brothers. "Labor Saver." 2:62. A guide to tools for the Assembly-language 

programmer. 
Brothers. "Mutual Understanding." 6:82. (I. III. 4) Describes file formats for 

different assemblers and tells how to make them compatible. 
Brothers. "Language Arts." 7:48. (I. III. 4) A comparison of three commercial 

Bask? authoring systems. 
Capps. "Fight Simulator." 5:40. (1. III. 4. lOOO) How to design a combat 

simulator. 
Dalton. "Prose and Cons." 1 1:36. (4) A comparison of eight word processors. 
Dixon and Rowell. "Dueling Software." 8:56. (4. lOOO) Two SO Micro editors 

pick their ideal software libraries. 
Dixon. "You Can Get There from Here." 9:36. How to move files from one 

computer to another. 
Harrell. "Born to Run." 1238 Tutorial on the C language 
Held. The GW Difference." 2.42. II. Ill, 4) The differences between GW- and 

TRS-80 Basic. 
Knight. "Summer Romance." 8:38. (4. 4P) Model 4 Basic's enhanced com- 
mands and functions. 
McGarvey. "Running Hard." 10:44. DOS and hard disk system. 
Meyer. "Hard Decisions." 10:40. Things to know before you buy a hard disk. 
Meyer, "Printer Preservation." 1 1 ;44. How to maintain and repair your printer. 
Payne. "That Sinking Feeling." 3:38. A tutorial on disk errors. 
Payne. Sr., "The Quiet Command." 1 1:68. (I, III. 4. 1000. 1200) A llllleknown 

Basic command. 
Rowell. "The Tandy 1000 Tip Sheet." 638. ( 1000) Advice, tricks, and patches. 
Rowell. "Sifting Through GW-Baslc." 846. ( 1000) A guide to Model 1000 Basic 
Rowel). "Have Data. Will Travel," 10:52. Running software written for one 

computer on another. 
Welch. "Date Lines." 4:72. (Ill) Sorting dates with Profile III Plus. 
West. "Current Events." 5:62. A consumer's guide to surge protectors. 

UTILITY 

Anaya. "Restricted Entry." 5 70 (1. III. 4. 1000. 1200. 2000) Restrict program 

input. 
Boggs. "Stationary Department." 5:74. (4) A scroll-protection utility 
Boggs. "Files From the Crypt." 1058 (4) Recover killed files 
Brothers. "My 10 Favorite Assembly-Language Subroutines." 948 (111. 4) In- 



put and screen-handling routines to merge with your Basic programs. 
Dvke. "The Right Address." 12:74.(4) A program that lorates memory addresses 

under TRSDOS 6.X. 
Goodwin. "Getting Ahead. 7 65 (111) Type-ahead feature for TRSDOS 1.3 and 

Cassette Basic. 
Hunter. "Room Available." 6:60. (I. HI) Increase disk storage capacity for text 

files with Huffman code. 
Knight. "Model 4 Scripslt the Write Way." 160 (4) A package of Scnpslt 

enhancements. 
Knight. "Key Notes." 1062. (4. 4P) Program the 4's function keys. 
Levinson. "Patch Work." 11 12. 1327. 8:251. (Ill) Thirteen patches to TRSDOS 

1.3. 
levinson. "Patch Work II: The Sequel." 872. (Ill) More patches to TRSDOS 1 .3. 
Levinson. "Merge Right."" 1 154 (1. Ill) Merge nun- ASCII files with Basir 

programs. 
Oler. Interrupt Anytime." 12:66. (Ill) Interrupts for TRSDOS 1.3. 
I"avllcek, "Full Recovery," 6:57. (4) Recover lost SuperScrtpsit flics. 
IVIzcr. "A Basic Programmer's Best Friend." 9:66. 14. 4P) Cross-reference Basic 

key words: variables: and GOSUB. GOTO, and Restore slalements by line 
number. 
Quindry. "Running Like Ihe Wind." 1:42 (5:29). (I. HI) A Basic compiler. 
Rlsler, "Extra-Strength DOS." 648. (III. 4) Soup up LDOS 5.X/TRSDOS 6.X. 
Robinson. "Patch Maker." 1076. (Ill) Install patches with a Build Hie. 
Schwelm. "A La CRT." 358 (7:26). (I. III. 4) Customized main menus. 
Smith. "A Son Story." 3:70 (4) Fast string sort for Model 4 Basic. 
Smith. "Run-O-Matic." 7:78. 14) Disk menus that let you load programs with 

the touch of a key 
Snyder. "The Great Divide." 8:62. (4. 4P) Partition your 128K system to switch 

between two programs in Model HI mode. 
Sparks. "Picture Perfect." 1:98. (I. 111. 4) Complete graphics production 

package. 
Wagner. "Fast Figures." 1 1 :60. (I. Ill) Binary I/O zips up disk accesses and saves 

disk space. 
Williams. "Zap Master." 4:62. (8:25). (4) Refined Debug utility 
Wilson. "Made-to-Order Sorts." 7:70. (I. III. 4. lOOO. 1200) Customized Basic 

sort generator for sequential files. 
Wolclk, "Storage lo Spare." 6:54. (4) Increase SuperScripsit's storage space. 
Wolfskill. "Total Recall." 7:54. ( 10:25) (4) Create and display help screens. 
Zcnzel Jr.. "Write Away. 12:41.(4. 1000) Basic C Interpreter. 



1985 REVIEW INDEX 



Reviews are listed alphabetically by product within each category, followed 
by the manufacturer's name and issue and page number. 



BOOKS 

How lo Get the Most Out of CompuServe. Bantam Books. 1 152. 

Mod-4 by Jack. Crest Software. 8: 1 15. 

The Source: TRSDOS/LS-DOS 6.2. Logical Systems Inc.. 1: 158. 

Teach Your TRS-80 to Program Itself. Tab Books Inc.. 9: 100 

friside CP/M Plus: A Guide for Users. Holt. Rtnchart. and Winston. 9: 103. 

learning Basic for the Tandy 10OO/20O0. Compusoft Publishing. 10:1 1 1. 

Programmer's Guide to LIXiS/TRSDOS Version 6.X. Misosys. 1 1:1 19. 

How to Use Your Radio Shack Printer. Tandy/Radio Shack. 12:126. 

GAMES 

Chess Classics, Noteworthy Software. 10:36. 
Crossword Master. Just Software. 4: 1 19. 
Flight Simulator. Microsoft Corporation. 7:1 14. 
Tournament Chess. Rapldynamic Software Inc.. 10:36. 

HARDWARE 

Graiyx Solution. Micro-Labs Inc.. I 11 19. 
Joy-Mouse Interface. Micro-Labs Inc.. 12:29. 
Lucid. Portable Computer Support Group. 4:31. 

Lindy 1000. Tandy/Radio Shack. 450 . 

randy 1200 HD. Tandv/Radio Shack. 3:31 
Tandy 200. Tandy/Radio Shack. 7:29. 

LANGUAGES 

CP/M 2.2. Montezuma Mk-ro. 3:35 

BetterBasic. Summit Software Technology. 6:33. 

GBask- 3.0. Micro-Labs Inc.. 12:29. 

PRINTERS 

CGP 220. Tandy/Radio Shack. 1:36. 
Hush 80. Ergo Systems Inc.. 834. 
Thinl'rint 80. Axonlx Corporation. 8:34 . 
ThlnType. Axonlx Corporation, 8:34. 

SOFTWARE 

Accounts Receivable 1.85. Holman Data Products. 9:31. 

Act HI, Avanti Associates. 4:36. 

Backrest. Powersoft. 10:35 

Brainstormer. Soft Path Systems. 9:100. 

Business Graphics Analysis Pak. Tandy/Radio Shack. 10:3 1 

Checkbook Plus. H&E Computronlcs. 2:38. 

DeskMate. Tandy/Radio Shack. 531. 

Disk Term. Indiana Software Co.. 429. 

DotWriler 4.0. Prosoft. 629. 

Draw. Micro-Labs Inc.. 12 29 

Easy-Writer 1. Information Unlimited Software. 5:1 10 

Electric Desk. Alpha Software Corporation. 6: 1 14 

Electric Webster. Cornucopia Software Inc.. 3: 1 16. 

Etch-AMouse. Soft Horizons. 6: 1 14. 

FasType. Press A Software. 11:119. 

Fullvlew. Mitek Systems. 2: 132 
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Protect Your Software 

FLIP N' FILE /15 

Protect Software from 
dust, debris and moisture. 
Stores up to 15 5V* diskettes 
List Price $9.95 Sato $7.95 




Also Available 
Flip 'n' File /SO 
Data Defender /35 
Data Defender /70 
Roll Top /100 



LIST 
$19.95 
$ 9.95 
$26.95 
$49.95 



SALE 
$14.95 
$ 7.95 
$19.95 
$39.95 
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Kill Spikes, Fight Surgel 
MAXI Strip 

Protect Valuable elec- 
tronic equipment and 
data files from dam- 
age. Surge and spike 
' suppressor and noise 
filter combination converts one outlet into 
six. 

List $34.95 WOW!!! only $19.95 
Also save on surge suppressors by 

LIST SALE 

$49.95 $39.95 

$59.95 $49.95 

$79.95 $69.95 



LOOK I 
ONLY S3.9S FOR THESE 
INFORMATIVE AND 
EDUCATIONAL BOOKS! 

80 MICRO REVIEW 

READ REVIEWS OF SOFTWARE AND 
HARDWARE. 

LOW-COST COSTING 

RUN YOUR BUSINESS BETTER WITH 
COST MANAGEMENT BOOK AND 
SOFTWARE COMBINATION. 

TEXTEDIT 

THE COMPLETE WORD PROCESSOR 

FOR LESS. BOOK AND SOFTWARE 

INCLUDED. 



TRS-80 ENCYCLOPEDIAS !! 
Gat ■ $200.00 value for only S40.0OI Tan 

volume! it $4.00 aich. You gal ir tic lei on 
buelneea, hirdwira, Interfacing le wall ee 
uHllUaa end tutorials. Cell now and gat the 
entire eat while supplies list 

ANNOTATED BASIC 

Two volumes of basic programming 
technique. Only 3.95 each 

TRS-80 DATA FILES 
DB management with simple basic SSS 



DOLLAR DISKS !! 

WE KNOW OF NO BETTER DISKS AT ANY 

PRICE. LIFETIME WARRANTY NATIONAL 

BRAND. 

SS/DD ONLY $1.00 Each 

DS/DD ONLY S1.1S Each 

Also.... 

Ultra Magnetic Bonus. Boa of 12 22.B0 

Sentinel DS/DD Color disks 10 pk. 19.95 

CDC SS/D0 10 pk. 9.95 

COC DS/DD 10 pk. 10.95 

DYSAN DS/DD Box of 10 33.95 



SAVE !! SAVE!! SAVE!! SAVE!! 
Sava 10, 20, 30 dollar! or mom on these great 
programs for your TRS-80. 
Niaht Flight 

Take part In pivotal WWII battle aa you takeoff , 
land and fly photo racon missions to determine 
the location of enemy ships 
(cassette only) ONLY 18.57 

Bowling League Secretary 

Player, learn and weakly acoree totaled and 
•avedl Also league statistics calculated for high 
average, high game and team leaders! 
(cassette only) ONLY $8.57 



CALL FOR OTHER SPECIALS!! 



CURTIS. 

Diamond 
Emerald 
Sapphire 



CHECK OUT THESE LOW PRICES ON GREAT TRS-80 PROGRAMSII 

All programs guaranteed to run. 

DISK PROGRAMS $9.97 CASSETTE PROGRAMS $8.57 



Ruby 



$89.95 $79.95 



Diamond Surge Protector Six Outlet, 
Switched, Rugs Directly into Outlet, Hot to 
Neutral and Ground Protection, LA Ap- 
proved, Lifetime Warranty. 
tSP-1 Retail $49.95 

FAN FOLD 
COMPUTER PAPER 

LIST SALE 

15#1000Sheeto $14.96 $ 9.95 

20# 10OO Sheets $19.95 $14.95 
20# 1000 Sheets 

micro-petted $19.95 $14.95 

20# 2500 Sheets $32.95 $26.95 



GAMES 

Sparrow Commander disk 

Kitchen Sink disk 

Space Shuttle cass. 

Battle Ground cass. 

Mystery Fun Hse cass. 

Galactic Empire c & d 

Dragonquest cass. 

Temple of the Sun c & d 

Ball Turret Gunner cass. 

Alien Attack Force cass. 

Cosmic Patrol cass. 

Swamp War cass. 

House of 30 Gables cass. 

Domes of Kilgary cass. 

Flying Circus disk 

Master Reversi c & d 



UTILITIES AND EDUCATION 

CASSETTES 
Cassette Scope 
Terminal -80 
Music Master 
Programers Converter 
Programers Primer 
Investors Paradise 
Renum Compress 
Disassembler 
Music Teacher 
The Elements 
Everyday Russian 

DISKS 
Disk Editor 
Teachers Aide 




TO ORDER CALL TOLL FREE 1-800-843-6700 OR CLIP AND MAIL: 
INSTANT SOFTWARE NAME 

82 MAIN ST. ADDRESS J 

KEENE , NH 03431 CITY 

STATE ZIP 

IN NH CALL 603-352-3763 M.C.VISA.M.Q. OR CHECK ACCEPTED 

Some items are limited in quantity ADD $3 00 F0R SHIPPING AND HANDLING 

BOSTON ACTON HUDSON KEENE NASHUA 

355 BOYLSTON 427 GREAT RD 35 LOWELL RD 82 MAIN ST NASHUA MALL 

617-353-1582 617-263-0418 603-883-8080 603-352-3736 603-889-0084 



HomeworD. Tandy/Radio Shack. 9: 102. 

Home Health Guide for Children. Clinical Reference Systems Inc., 10: 1 10 

IDEA!, Traveling Software. 9 102 

Intercalc. Comtrol Data Products, 10.34 

Interprinter. Comtrol Data Products. 10:34 

Let's Talk. Good Software Co.. 2:35. 

List/Key. The Soft Place. 2: 130. 

Little Brother. Logical Systems Inc.. 9:34. 

Math Master Series. PAB Software Inc.. 8: 1 13. 

Microsoft Word 2.0. Microsoft Corporation. 8:1 14 

MLlnk Communications System. Corporate Microsystems Inc.. 10: 1 1 3. 

Money Decision Scries. Tandy/Radio Shack. 1233. 

Monte's Window. Montezuma Micro. 8:36. 

Offlx Personal Office System. Emerging Technologies. 9: 102 

Omnlterm2. Lindbergh Systems Inc.. 7: 1 14. 

Orchestra-90. Tandy/Radio Shack. 3: 1 14. 

PFS:Flle and Report. Tandy/Radio Shack. 7:33 

PowerScrlpt. Powersoft. 7 114. 

Producer. Software of the Future. 139 

Profile 4 Plus. Tandy/Radio Shack. 1 1: 1 14. 

PRONTO. Mlsosys Inc.. 11 29. 

Remote Control. Kensington Microware Ltd.. 6; 1 13. 

Super DBM. Scientific Analysis. 634. 

Snperlog 4. KSoft Inc.. 8:29. 

Tax-Prep, EZWare Corporation. 4:111. 

Telecommuter. Slgea Systems Inc.. 12: 126. 

TKISolver. Tandy/Radio Shack. 7:115. 

T/Maker (CP/M). T/Maker Company. 1:34. 

T/Maker 4.03 (TRSDOS1. T/Maker Company. 10: 1 1 1 . 

Total Learning System. Total Learning Systems Inc.. 10: 1 10. 

TRSDOS 6.X Training Course. Tandy/Radio Shack. 6: 1 15. 

Typltall. Howe Software. 12.125. 

Volkswrlter Deluxe 2.0. Lifetree Software Inc.. 5. 1 10. 

Wlndow-Comm, Software Consultants. 1 1:31. 

Wlndowpad. En Fleur Corporation. 10:34. 

Word Machine 3.0. Pel-Tek. 7:1 13. 

Word Perfect 4.0. Satellite Software Int.. 12:125 

xT.CAD. Mlcrodex Corp.. 237. 

UTILITIES 

BEEP. Logical Systems. 7:34. 

CopyllPC, Central Point Software Inc., 11:119. 

Convert 3 to 2OO0. Educational Micro Services. 5:114. 

DISnDATa. Pro/ Am Software. 2:126. 

DoubleDuty. Tandy/Radio Shack, 10:36. 

DSM4. Logical Systems Inc.. 1 1:1 16. 

GW Basic Compiler. Tandy/Radio Shack. 8:30. 

Hypercross (Supercross/XT). Hypersoft. 9:29. 

Hyperzap. Hypersoft. 12:34. 

LS-Utillty Disk. Logical Systems. 535 

Multi-Basic Compiler. Alcor Systems. 1 1 :33. 

MULTIDOS 80/64. Alphablt Communications. 12: 124. 

Pro-Create. Mlsosys. 8: 1 14. 

PROX-FTS. Mlsosys. 12:126. 

Overdrive. Logical Systems. 6: 1 14. 

NEWDOS/80 Utilities, Software Success. 631. 

Norton Utilities 3.0. The Norton Utilities. 8114. 

Rapldos. Rapldynamic Software Inc.. 7: 1 13. 

Supercross/XT. Powersoft. 9:29. 

Supermod4. Intellltech Corporation. 9:33. 

Vivace. Wlttsoft Inc.. 4; 1 15. 

Window DOS. Window-DOS Associates. 1 1:1 18. 

Zeus Editor/ Assembler. Cosmopolitan Electronics Co.. 1: 154. 
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Each entry lists the article name, page number, and names of major programs. 



JANUARY 

"Running Like the Wind" (42): rastBas, Pong. An updated Basic compiler. 
"Model 4 Scrtpsit the Write Way" 160): ScripAid. An enhancement package 

for Model 4 Scrtpsit. 
"NovaCak" (82); NovaCalc. A Basic spreadsheet program. 
"Picture Perfect" (98): CHARGEN. Create your own graphics characters 
"On The Record" (106): RANDISK Create and read Indexed random access 

disk files. 
"Formula Solutions" (116): Cubic. Solve cubic, quadratic, and linear equations. 
Project 80 (120): Interrupt. Use the 8259A interrupt controller with an I/O 

board. 
BBS Express (132); BBS1 . BBS2. A routine for locating message numbers. 
The Next Step ( 140): Demo. Demonstration program to create a beep generator. 

FEBRUARY 

"Picture This" (56); Graph. Create pictures and combine up to nine screens for 

a composite illustration. 
"The Pecking Order" (59); NOEATERS. Gobble up the numbers on the screen 

to win the game. 
"By the Numbers" (68); GraphMaster. Plot or display data In line or bar charts. 
The Next Step [ 1 12); Demo. Use DOS exits to add commands to Basic. 
BBS Express ( 104); BBS9. Sort -and -search program for your BBS. 
Bonus program: Mail List. Model 4 mailing list. 

MARCH 

"Grade-A Graphics (44): Graph. Versatile graphics generator. 
"A La CRT" (58V. Listings \-12 Basic subroutines that create menus 
A Sort Story" (70): Sort. A string sort for Model 4 Basic. 



BBS Express (88). BBS. This module gets your bulletin board up and running. 
The Next Step ( 100). Helpfile A help file generator program. 
Bonus program. Alien Shuffle Rearrange aliens Into proper groups 

APRIL 

"Clear -Cut Trends" (40): Grapher. Draw and print out high-resolution line and 

bar graphs. 
BBS Express (90): BBS The BBS data base catalog module 
"Zap Master" (62): Disk Zapper. Read and modify Model 4 disk sectors. 
The Next Step (98): Filter. A video filter program. 
Bonus program TapeDisk. Tranfers all files from the I-oad 80 cassette to disk 

MAY 

"Fight Simulator" (40): Endgame. Combat simulation 

"Restricted Entry" (70); Prompter. Predefine acceptable user input. 

"Stationary Department" (74); Scroll. Adds scroll protection to Mode! 4 video 

display. 
"Fractals in Focus" |58): Fractal3. Fraetal4 High-resolution fractals. 
BBS Express (92). BBS. Put the finishing touches on your bulletin board system. 
The Next Step ( 10O): Extend. Demonstration of an extended command 

Interpreter. 
Bonus program: Convert. Convert Apparat or Series 1 source files to ALDS 

format. 

JUNE 

"Extra Strength DOS" (48); Setup. Add features to LDOS 5.X.X or TRSDOS 

6.X. X. 
"Full Recovery" (57); Repair. A file-recovery program for Model 4 SuperScripsit. 
"Room Available" (60): Compress. Decompress Conserve disk space using 

Huffman format. 
"Don't Be Late" (74); CPS. Develop timelines for projects. 

The Next Step ( 102): Driver. DRIVETST. Add windowing capability to the Model 4 
Spreadsheet Beat ( 1 lO): Documented Print SYI.K files in an easy-to-read format. 
Bonus program: Convert2. Convert source file formats 

JULY 

"Total Recall" (54); Helper. Display help screens on the Model 4 
"Getting Ahead" (64): Type. A type-ahead utility for TRSDOS 1.3 
"Made-to-Order Sorts" (70): Sorter. A custom sort generator. 
"Run-O-Matic" (78). Autorun. Load Model 4 disk flies from a menu. 
Project 80 (84): Display Remote display board controller 
The Next Step ( 10O). WS. Test. WD. Part II of the windowing system 

AUGUST 

"Summer Romance" (38): Main Menu. Clock. Menu sequencing and clock dls 
play routines. 

"The Great Divide" (62): Times2. Partition your 128K Model 4 and switch be- 
tween two programs in Model 111 mode 

"Patch Work II The Sequel" (72): Domakcr Install up to 13 TRSDOS 13 
patches. 

"Upgraded Graphics' (76): Pixel Add the commands Point. Set. and Keset to 
Model 4 Basic 

The Next Step (98): WU. Window system user interface. Part III. 

Spreadsheet Beat (108): BondYTM. Calculate bond yield-to-maturity using 
VlslCalc. 

SEPTEMBER 

"My 10 Favorite Assembly-Language Subroutines" (48): Listl. I.lst2. List3. 
List 4. I.lst5 Ten input and screen-handling subroutines. 

"A Basic Programmer's Best Friend" (66); Crosscheck. Keywords Model 4 Ba- 
sic cross reference program 

"Drawing in Detail" (56): Rembrandt. Screcngrtd. Hexagon. Computer. High- 
resolution icon-driven graphics editor. 

The Next Step (90): I-ine. A line-drawing subroutine and sample Basic program. 

Spreadsheet Beat (94); Report Card. Calculate students' grades with VisiCalc. 

OCTOBER 

"Files from the Crypt" (58): Restore. Retrieve killed files on the Model 4 

"Key Notes" (62). PF/FLT. Model 4 function key filter 

"Next-Generation Software" (70): Genetics. Recreate genetic experiments. 

"Patch Maker" (76): Patcher A patch management program. 

The Next Step 1 100); File Chop. Condense random-access flies 

Spreadsheet Beat ( 106): TaxEst85. Track expenses and estimate federal income 

tax with Multlplan. 
Bonus program: Diskbug. TRSDOS 1.3 debug utility. 

NOVEMBER 

"Merge Right" (54): Merge. Merge non ASCII files on the Models 1 and III. 
' Fast Figures" (60); DISQUICK Faster reads and writes with binary I/O. 
"Savings and Loan (83): Loan. Calculate Interest by the rule of 78s 
"Password Bypass" (72): UNPROT. A Model I/III/4 file protection remover. 
The Next Step (102); Listl. Strip trailing blanks, encode and decode strings. 
Spreadsheet Beat (108); Budgeter. Maintain a monthly personal budget with 

Multiplan. 
A program update: REMBRAN4. Updated version for the Model 4: first appeared 

on September 1985. Load 80. 
Bonus program- SpeedDOS. 4MHz operation in the Model HI mode. 

DECEMBER 

"Write Away" (4 1): C Trainer. Basic C interpreter. 
"Net Results ' (52): Hoops. Basketball statistics program. 
"Window Screens" (58): Sinewave. PrismRing. Windows. High resolution 

graphics and pie chart application. 
"Interrupt Anytime" (66): Break In. Scroll. Programmable interrupts for 

TRSDOS 1.3. 
"The Right Address" (75): Locator Finds TRSDOS 6.X system addresses. 
"Rembrandt Redux" (76): Listl. Llst2. Screen dump routines for our Rem- 
brandt graphics editor. 
Tidbit #30 (83): Page File list utility. 

Project 80 (85). Convert. Converts object files to hex/ASCII. 
The Next Step 1 108): Squeeze. Condenses Model 4 programs 
Bonus program: Delete. Multiple LDOS 5.X kill command. 
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Circle 455 on Reader Service card. 

TanPak™ 

The Ultimate Expansion for the Model 1000! 

The TanPak expansion board has been designed to allow 
expansion beyond the scope of the standard Model 1000. Seven of 
the most needed function&'features have been combined into one 
package using only one expansion slot Your remaining spaces 
are left free for future expansion needs And the best part of all, it 
will save you money over the Tandy Boards 
TanPak™ Ok $349 





ttti«N& 



I *&ato4ttft 




Funcllon» Include 

DMA 

Serial Port 

Memory up lo5!2K 

Oock'Calendar 

Pnnte' Spooler 

Memory Disk 

Expansion Port lor Fulure Options 



TanPak features include 
Gold Edge Cards 
Supporting Software 
f'e Tested and Burned In 
Full Documentation 
One Year Warranty 
Expandable to 512K 



TanPak™ Secondary 

Made to work with a Tandy 1000 memory board as the second 
memory board Featuring a Serial Port. Clock Calendar. Memory 
Expansion to 256K, Printer Spooler, and Memory disk 
TanPak™ Secondary $249. 




Tandy 1000 Hard Drives 

HDS Hard Drives for the Tandy 1 000 allow booting directly from 
the Hard Drive using the Tandy DOS. All units are complete with 
controller, ready to plug in and use. The Internal Hard Drive Units 
replace the top disk drive inside the 1000, or request an external 
unit for only $150. more. 

10 Meg Internal $549. 

20 Meg Internal $749. 

43 Meg Internal $1399. 

TanTel 

Internal 300/1200 Baud Modem $249 



8087 Board 



8087 Math Co-processor board for the Model 1000 

Plugs in internally but does not use one of the 3 expansion slots 

$249 



(Available Fall 851 




Model 1, 3, 4 Hard Drives 



5 Megabyte 
10 Megabyte 
20 Megabyte 
30 Megabyte 



Primary Secondary 

$795. $595. 

$1095. $895. 

$1295. $1095. 

$1895. $1695. 



Hard Disk Subsystem Features: 

• All sizes rated after formatting. 

• Your choice of DOSPLUG, LDOS or TRSDOS 6 x 
included. 

• NEWDOS 80/ Version 2 5 Systems Available 

• Up to two secondary drives may be added 

• Error checking and correcting controller 

• Buffered seek drives for improved access time 

• Built in power up diagnostics 

• Plated media for long disk life 

• Heavy duty power supply 

• Gold connectors used throughout 

• 1 year warranty 



Drivers 



HDS Multiplexer 

Allows 4 Computers to use a HDS Hard Drive, 

Base unit $1295 



Model 3/4 RS232 Kit $69. 



Hard Drive Specialist 



16208 Hickory Knoll 
Houston, Texas 77059 
1-713-480-6000 
orderline 
1-800-231-6671 



Ordering Inlormatlon 

Uk our WATS line to place your order via Vl»a, MasterCard, or Wire Transfer, Or. you can mall | 
your payment directly to u* Any non-certltled lunds will be held until proper clearance li made 
COD orders are accepted as well as purchase orders Irom government agencies UPSgroundls I 
our standard means of shipping unless otherwise specified Shipping cost are available upon 
request. Tandy and Radio Shack are Trademarks of Tandy Corporation. TanPak, and TanTel are | 
Trademarks of Hard Drtve Specialist, a division of Compuklt Corporation. 



NEW PRODUCTS / edited by Mare-Anne Jarvela 



Printer News 

Xerox Corporation's Xerox/ 
Diablo D80 is a letter-quality 
daisy -wheel printer that prints 
at speeds up to 80 characters 
per second with noise mea- 
sured as low as 58 decibels. 

The D80 features Diablo's 
all-purpose interface (API), 
which allows easy hook-up to 
RS-232. Centronics, or IEEE 
488 interfaces. A semiauto- 
matic paper feed lets you 
switch between different pa- 
per sizes and weights. 

The D80 uses Diablo's ex- 
tended character set with 200 
characters per print wheel. 
Multilingual print wheels are 
also available that allow the 
D80 to print in 33 languages. 
The printer is $2,195. An op- 
tional bidirectional tractor 
($300) and a dual-bin. cut- 
sheet paper feeder ($903) are 
available. For more informa- 
tion, contact Xerox Corp.. Xe- 
rox Square 006. Rochester. NY 
14644.716-423-5078. 
Circle 566 on Reader Service card. 

Universal Basic 

ZBasic 3.0 from Zedcor Inc. 
is faster than Turbo Pascal 
3.0 and uses the same pro- 
gramming commands re- 
gardless of the computer you 
use. The IBM PC. PC XT. PC 
AT and compatibles: Apple 
lie and He: Macintosh: TRS- 
80 Models I. III. 4: and CPM 
80 2.2 and 3.0 computers all 
use the same commands with 
this language. ZBasic code 
works with all the leading mi- 
crocomputers; if you write a 
program in ZBasic on an Ap- 
ple, you can port it over to a 
Tandy computer and it will 
run the same way. 

ZBasic includes device-in- 
dependent graphics. 54-digit 
accuracy, a built-in interac- 
tive editor and compiler, a 
choice of alphanumeric labels 
or line numbers, and more at 
a base retail price of $89.95. 
For more information, con- 
tact Zedcor Inc.. 3438 N. 




The Xerox/Diablo D80 daisy-wheel printer Is quiet and fast. 



Country Club. Tucson. AZ 

85716. 602-795-6800. 

Circle 560 on Reader Servtce card. 

Board Talk 

Fast80 ($59.95) from SOTA 
Computing Systems Ltd. is a 
bulletin board system for the 
Model 4/4P. It's written en- 
tirely in machine language so 
responses to user requests 
are almost instantaneous. 
The entire message/user/ 
command base resides in 
memory. Fast80 needs 128K 
and works under TRSDOS 
6.2 and DOSPLUS 4. 

The bulletin board sup- 
ports 445 different user IDs 
and handles up to 120 mes- 
sages. Fast80 drives just 
about any direct-connect/ 
auto-answer modem includ- 
ing Radio Shack's Modem II 
and Hayes and Microconnec- 
tion units. For further infor- 
mation, contact SOTA 
Computing Systems Ltd., 
213-1080 Broughton St.. 
Vancouver, British Columbia, 
Canada. V6G 2A8. 604-688- 
5009. 
Circle 554 on Reader Service card. 

A, B and C 

Jack Purdums C Self- 
Study Guide helps you dis- 
cover the C programming 
language at your own pace. 
Part I of the book provides 



questions of varying degrees 
of difficulty to guide begin- 
ners over the rough spots and 
to challenge more experi- 
enced C programmers. Part II 
has answers that include 
many complete programs for 
testing new functions and for 
illustrating tips, traps, tech- 
niques, and shortcuts. 

The book is approximately 
250 pages and costs $16.95. 
For more information, con- 
tact Que Corporation, 7999 
Knue Road, Suite 202. Indi- 
anapolis. IN 46250, 800-428- 
5331. 
Circle 562 on Reader Service card. 

Remote Control 

Dynatech's Turn-On. a 
compact, intelligent power 
controller, automatically ac- 
tivates unattended computer 
systems 24 hours a day. per- 
mitting file transfers, elec- 
tronic mail delivery, and 
more. 

Turn-On activates and 
powers up a computer sys- 
tem when it senses an incom- 
ing phone call, leaves the 
system on for the duration of 
the call, records the time of 
the call and all activity, and 
powers the system down 
when the call is completed. 
Turn -On comes with full com- 
munications software capa- 
bility and built-in ac power 



and phone line protection to 
guard against power surges 
and potentially damaging 
voltage spikes. 

Turn-On sells for $295. For 
more information, contact 
Dynatech Computer Power 
Inc.. 4744 Scotts Valley 
Drive, Scotts Valley, CA 
95066, 800-638-9098. 
Circle 555 on Reader Service card. 

Language Tutor 

Learn Spanish The Easy 
Way ($69.95 plus $3 shipping) 
is part of a new foreign-lan- 
guage software scries from 
International Computer 
Products that runs on the 
Models III and 4. some CP/M- 
80 based systems, and MS- 
DOS computers. 

You type in a simple sen- 
tence in English. The pro- 
gram uses artificial intelli- 
gence techniques to interpret 
the sentence and display or 
print a Spanish translation. A 
large vocabulary allows 
phrase compositions with 
over 80.000 possible word 
combinations. The program 
also includes conjugation of 
regular and irregular verbs, 
and exercises in noun declen- 
sion. A German version is 
also available. You can also 
get an optional voice synthe- 
sizer for the Models III and 4. 

For more information, con- 
tact International Computer 
Products. 346 N. Western 
Ave.. Los Angeles. CA 90004. 
213-462-8381. 
Circle 565 on Reader Service card. 

Stocking Stuffer 

The Floppy Disk Story is a 
32-page booklet from Fuji 
Photo Film that introduces 
computer users of all ages to 
the basic building block of the 
floppy disk. The booklet 
teaches you about a floppy 
disk's construction and opera- 
tion, as well as its proper care. 
While appealing to children. 
The Floppy Disk Story is also 
perfect for the not-so-young 
who are new to computing. 
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Circle 186 on Reader Service card. 




Three programs for the Models 100 and 200 come on one 
ROM chip. 



You can get the booklet free 
by writing to Fuji Film Pro- 
motion Dept.. P.O. Box 9870. 
Wethersfield. CT 06109. 
Limit requests to one per 
household. 
Circle 556 on Reader Service card. 

Three in One 

Traveling Software has put 
three of its most popular 
Model 100/200 programs on a 
single ROM chip. The Ulti- 
mate ROM includes Idea!, an 
outline processor; T-Base, a 
data base management sys- 
tem; and T-Writer, a text for- 
matter. 

Because these three pro- 
grams reside in ROM, they 
use almost no RAM, allowing 
larger data files than ever be- 
fore. Ultimate ROM sells for 
$229.85 and includes the 
Traveling Memory Manager 
and an audio cassette over- 
view of the programs. 

The Ultimate ROM is avail- 
able from Radio Shack stores. 



For more information, con- 
tact Traveling Software Inc., 
11050 Fifth Ave. N.E., Seat- 
tle, WA 98125. 206-367- 
8090. 
Circle 552 on Reader Service card. 

Executive Covers 

Regatta computer covers 
from Cover Craft Corp. are 
made of cotton/polyester 
blend material specially 
treated to resist stains, mois- 
ture, and wrinkles. They are 
also machine washable and 
nonstatic. 

The covers come with a 
built-in disk storage pocket 
and pencil holder, and a stor- 
age wallet for the cover when 
not in use. Sizes are available 
for all popular microcompu- 
ters and related equipment. 
Colors are sand with navy 
trim and navy with sand 
trim. Prices range from 
$21.95 to $34.95. 

For further information, 
contact Cover Craft Corp., 




Dress your computer in Regatta wear. 




PROf ix * IV™ 

RESTRUCTURE&TRANSFER 
UTILITY 



NEW! For PROFILE® 4 PLUS 

Model 4- TRSDOS* 6.2 

42,25 



NEW! 



For PROFILE" PLUS 

Model 11/12 

$89.95 



For PROFILE* III PLUS ALSO 

Model 1 1 1/4 

LDOS® or TRSDOS® 1.3 

$49.95 

PROfix allows you to reorganize your data base TO Mt 1 1 TODAY'S NEEDS, 
and then moves ALL or SLLbCTfcD fields and/or records of existingdata into 
your new file structure. 

** 'FEATURES*** 

• WORKS WITH HARD DISK OR FLOPPY 

• CREAIE LNIIRfcLY NEW TILFS-selected fields, records 

• PROVIDLS ARCHIVING — hard disk to floppy 

• RE ARRANGF FIFI DS — even across segments 

• DROPORADDFIELDS 

• SHORT FN YOUR FILE -drop unused expansion records 

• CHANGE FIELD LENGTHS-R/L justify data 

• CHANGE NUMBER OF SEGMENTS 

• CRT ATI SORTED FILE— drop deleted fields 

• LITERAL INSERTION — specified fields 

• COMPLETE USER MANUAL— with examples 

-TO ORDER- 

Send S49 91 (Model HI/4) or J89 9S (Model 111 J) 

Plus $2.50 for Handling and Postage 

Check. MO . VISA'MC or COD 

(tor charge card, give expiration date, number) 

To- BLUE RIDGE SOFTWARE 

230 Chesterfield Road 

Lynchburg. VA 24502 

(or phone cxdrrs cw more information 

Call (KM) 2 (9-0571 

J 1 00 oft on phone orders' 

Virginia resident* add 4% sales tax 

Most orders filled within 24 hours 

(allow 2 weeks tor t hecks to clear) 

PLEASE SPECIE Y VERSION 

Profile, TRSDOS are registered trademarks ol Tandy Corp 

I DOS is a registered trademark of Logical Systems. Inc 



Circle 86 on Reader Service card. 




State of the art technology m board desist" ou' direct repiacem«ni o< Redw Shack s' 
internal RS-232 board mounts inside ihe Model ill or 4 on the ••■sling brackets Ail 
rabies screws and complete mounting instructions are included No" technical 
people win imd that installation is quick. s'-iKjht lorward and vmpi* requiring less 
lhan 15 minutes lo complete 

Total compalataiity wrtn Radio Shack" and an suiting software ■% maintained 
Software programmable baud rates Irom SO to 1 9 ?00 baud are supported along with 
programmable word length stop bits and parity May be ulitued m either hall ol hjl 
duple, ope.at.on Outrt-naMnfJ VMM 

•69. 95 



hlTppiT 

n i H4- 

• i • ■ 

ii4/jx>i>j: 



Only 

Guaranieed One FsJ Yea' 
."Va'e- Imju.'iej .n,.leS 

Please forward payment by a cashier's 
check or money oftle* 

Visa oi Maslercharge also accepted. 

Add S3 00 shipping & handling 

(Foreign orders quoted on request) 
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Circle 136 on Reader Service c«rd. 
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\ 



aditor 



On 



EDIT 

Fullscreen Basic 

£»— ass 



Network3 „» 53 s /h, 

Reg $H0 



ACCEL3 ' 4 Ba,c Compile, 
Ea8V .,o- U se Bas = } 

EX S A B«ic 

tVSl.9S S49.95.S2 S/h 



?, BE v. „• rode development 



FC 

Full screen all drive 
directory. A must 1 

HD users 

Reg S25 



S15 
Sis/h 



SuperStep/EMU02 

JLcinahng Z8Q.6502 
emulators Terrii.c 
tun ior learning, de- 
bugging 




Programs work on TRS-80 Model I III, MAX-80 
(specify which machine), any DOS CA add 6% 

Geider Software 

Boi 117? 1 San Francisco CA 94101 (415)681-9371 



Circle 56 on Reader Service card. 



INTELUBURNER 

EPROM-EEPROM-MICROCOMPUTER PROGRAMMER 

UNIVERSAL PROGRAMMING CAPABILITIES 
AT AN AFFORDABLE PRICE 

. Ultra I'.isi Programming - 2716's in 16 Seconds 

. Programs & Verifies 8K thru 2S6K Single Voltage EPROMs 

. Erases. Programs & Verifies 2815. 2816 & 2817 EEPROMs 

. Programs & Verifies 8748 and 8751 Series MICROCOMPUTERS' 

. Programming Characteristics Selected by Convenient 

Personality Jumper Plug (DIP Header) 
. Program. Verify, Status. & Diagnostic Display with Tricolor LED 
. Serial Interface — 3. 4. or 5 wire — 1200 to 19200 Baud 
. Supports ACK/NAK. XON/XOFF and READY/BUSY Protocols 

NO SPECIAL SOFTWARE REQUIRED Transfer disk files (Intel Hex or Motorola's' Format) 
to EPROM with your system's line pnnter or modem software Transfer EPROM contents 
to disk file with your system's modem software Or use the supplied software ** to transfer 
any binary or ASCII file to/from EPROM 

PROGRAMS: 

2TS8 2716 77128 2815 8741' 8748* 

:. . - 2816 

2532 27J2A 27256 2817 X2212" 8751' 
2564 2764 68764 27C San* 875V 

'Raguaai kn> coat panonatov •dapM* 

SOFTWARE AVAILABLE FOR: M 

CP/M Mima OK 8" SSSD - '-«". = ' • lor-mi 

TRSAC Modal 1 1 ■ TRSDOS NEW TRSDOS 6 X 
•.MM 

"Er-TTHZ90«Zt00CP,M 2100 2DOS 2150 
KAYPHO H/tV/1 0/16/286/2000 

IBM PC PC/XT AT - many MS-DOS iwfcn. 

b**a6*"«* p».*jr*»i«-Tw, —>*» *.*•>.*,. *.•"" 

SivtaAtont RAM OPTION -«•> *4K B» RAM 

II 00 

matiuiwKSariiUKMRntSaUa *»0n 

Low Cost "Dum Burner" serial progjam- 

i nil s linings the power of your personal 
compuler with the supplied software for full 
programming capabilities: 




OSS f+USTOM FLCCTRONICS 



1551 Sandra Drive 

Boulder City, Nevada 89005 

PHONE (702) 293-7426 

Mi HHHMHS < 



»*«-4l£lftU»h 
CkaraVmaf I Ban PC Bua-i Ran* 6 S a. ai 

■*™i»;iis.[nr»kMk4iu.« 

I WWJH CUaSna PC Bn»d I'am a •.*_«, 
wli«a),iM<,Vb.ka«COj .«<w 



I In. VI..I.I I-i.mIu.i. I PHOM h~.fi 

Modal ■■■ 1 "MS ■ Spana. Pnc« 
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Wff:h TAS-41 , four users can share one computer. 



540 N. Commercial St., 

Manchester. NH 03101, 800- 

644-3555. 

Circle 561 on Reader Service card. 

Hook Them Up 

Western Telematic Inc. of- 
fers a terminal-activated 
switch that lets up to four 
users share one computer 
port. The TAS-41 ($395) 
makes switching automatic. 
Each user connects and dis- 
connects by entering simple 
commands from the termi- 
nal's keyboard. To prevent 
port tie-up in the event a user 
forgets to log-off, a timeout 
feature disconnects a port if 
no data activity takes place 
within a user-selectable time 
period. 

For additional information. 



contact Western Telematic 

Inc.. 2435 Anne St.. Santa 

Ana, CA 92704. 800-854- 

7226. 

Circle 559 on Reader Service card. 

Power Play 

American Power Conver- 
sion Corp. introduces the 
450AT uninterruptible power 
source. When protecting a typ- 
ical enhanced personal com- 
puter with a hard disk and 
monitor, the 450AT provides 
15 minutes of operating time 
during an extended outage. 
For added protection, an elec- 
tronic overcurrent protection 
and a master power switch 
control come standard. 

The 450AT incorporates an 
internal, sealed, maintenance- 
free battery and a precision 




The 450AT is specifically designed to power your desktop 
computer. 
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battery charger to insure de- 
pendable power at a moment's 
notice. It also offers built-in 
surge protection and com- 
bined EMI/RFI filtering. 

The price is $799. For more 
details, contact American 
Power Conversion Corp.. 89 
Cambridge St., Burlington, 
MA 01803, 800-343-2507. 
Circle 567 on Reader Service card. 

Spider Terror 

Gamco Industries' Spider 
Hunt Spelling game ($39.95) 
for the Models III and 4 
teaches spelling and includes 
student and program man- 
agement systems as well. 

The student becomes a spi- 
der hunter whose goal is to 
catch as many spiders as pos- 
sible in a set amount of time 
(one to 10 minutes). You can 
also set a level of difficulty 
(1-5). 

Four words appear at the 
top of the screen, each with a 
spider descending from it. 
Some of the words are spelled 
correctly and some are mis- 
spelled. Students move the 




Spider Hunt Spelling teaches spelling the fun way. 



spider hunter from word to 
word and identify each word 
as correctly spelled or mis- 
spelled. If they answer cor- 
rectly the spider falls into a 
sack. 

A bank of 400 words (200 
spelled correctly and 200 
misspelled) permanently re- 
sides on the disk. Teachers 
may also enter up to five lists 
of 80 words each. 



For more details, contact 
Gamco Industries Inc.. Box 
1911, Big Spring. TX 79721. 
800-351-1404. 
Circle 558 on Reader Service card. 

Facts and Logic 

Logical Lynx from Krell 
Software Corp. teaches the 
art of scientific reasoning by 
showing you how scientists 
apply logic to actual bodies of 



knowledge in the natural and 
social sciences and humani- 
ties. It also teaches you basic 
scientific facts and how you 
can understand, organize, 
and fit these facts into mean- 
ingful patterns. 

Twenty data bases provide 
basic information in critical 
areas of knowledge, as well as 
techniques for linking that in- 
formation in new ways. You 
create, research, and organ- 
ize new data bases on sub- 
jects of your choice. 

Logical Lynx comes in 
three levels of difficulty 
priced at $49.95. $69.95. and 
$89.95. One free data base 
comes with each system's 
master. 

Additional data bases cost 
$19.95 each. Sample data 
bases include sports of the 
world, great writers, and 
chemical elements. 

For more information, con- 
tact Krell Software Corp.. 
1320 Stony Brook Road. 
Stony Brook, NY 1 1790, 800- 
245-7355. 
Circle 563 on Reader Service card. 



Circle 464 on Reader Service card. 



Graphics Solutions 

High-Resolution Software and Hardware 



GBASIC 3.0 • Radio Shack Model 
4/4P/III hi-res board owners take note of 
an enhanced graphics Basic; GBASIC 3.0 
not only has an equivalent for each of the 
BAS1CG commands but adds a number of 
important new commands while using less 
memory. The hires screen can be printed 
on any of 20 popular printers or saved to 
or loaded from disk without leaving Basic. 
The software works with TRSDOS 1.3. 
6.1.2, 6.2, LDOS. NEWDOS80, and 
DOSPLUS. The disk contains 40 graphics 
programs/files. Also included is a detailed 
manual which includes assembly language 
entry addresses. $49.95. (Specify Model 4 
or III mode or add $10 for both.) 

The following nine programs run on a 
Model 4/4P/1II equipped with a Radio 
Shack graphics board and GBASIC 3.0 or 
a Micro- Labs Grafyx Solution board: 

DRAW - A powerful full screen graphics 
drawing and editing program. $39.95. 

BIZGRAPH - Create business graphs from 
hand-entered or VisiCalc data. $98.00. 

xT.CAD - Professional drafting aid which 
outputs to a printer or plotter. $449.95. 



CHESS - A very powerful program with 
10 skill levels, 40 play options. $49.95. 

REVERSI - Play Othello with 10 skill 
levels, 20 execution options. $39.95. 

3D Tic-Tac-To« - Play the computer or 
a friend on a 4x4x4 matrix. $29.95. 

3D-PLOT - View three-dimensional data 
from any perspective or angle. $39.95. 

MATHPLOT Plot equations of the form 
Y = F(x) with auto scaling. $39.95. 

SURFACE PLOT - Plot three-dimensional 
equations of the form Z=F(x,y). $39.95. 

GRAFYX SOLUTION. Plug-in. clip-on 
board enhances any Model 4/4P/III to 
provide 640 x 240 / 512 x 192 dot 
graphics. Comes with over 40 programs 
and files including GBASIC 3.0 which adds 
over 20 new commands. $199.95. 

JOY-MOUSE. Allows a Radio Shack 
CoCo joystick, mouse, or touch pad to be 
connected to any Model 4/4P/III. Hardware 
provides X, Y position values from to 
255. A built-in speaker produces sound 
from the cassette port. $129.95. 
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G.I.N.A. Software program for the Model 
4/4P/I11/I which uses the standard block 
graphics screen to display a window to a 
larger 65536 x 65536 dot tablet. The 
arrow keys are used to draw two or 
three-dimensional figures. The display can 
be scaled, shifted, or rotated in any 
dimension. The final picture is printed in 
hires on Radio Shack, Epson, Gemini, NEC 
8023, or Prowriter printers. $75.00. 

Please specify your exact system 
configuration when ordering or requesting 
information. Payment may be by check, 
Visa, Mastercard, or COD. Domestic 
shipping is free on prepaid orders. Texas 
residents add 5',% sales tax. 

Micro-Labs, Inc. 2142350915 

902 Pinecrest, Richardson, Texas 75080 



80 Micro, December 1985 • 149 



NEW PRODUCTS 



DIFFERENT TRACK 




The Generic Computer comes with 16K and color 
graphics. 

New Generation Computer 

The Generic Computer from Intec Inc. weighs less than 
10 ounces and comes with color graphics, a letter-quality 
printer, its own special software. 16K, and the most de- 
pendable chip in the industry. 

The computer is designed and written in good taste and 
sells for $5.95. Add 50 cents for shipping and handling. 
Contact Intec Inc. (676 Polk St.. Eugene, OR 97402, 503- 
343-1464) for more information. 
Circle 564 on Reader Service card. 
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Circle 449 on Reader Service card. 
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Professional 
handicapping systems 



PRESENTED BY PROFESSOR JONES 



'^W 



GLO. Thoroughbred "Gold" Edition™ 

A "Full" featured Thoroughbred analysis designed lor The professional and 
ine serious novice $159.95 complele 

EGLO. Enhanced "Gold" Edition™ 

' Gold" Edrtion «mth complele Master Bettor " system «iterjf3ted onto the same 
disk This powerful program wil transfer al horses and scores to the bet analysis 
with a single keystroke " (Master Bettor - mdudedl S199.95 complete 

GLTD. Limited "Gold"™ 

Enables ProftuioMl HandicapMn to assign specific values to the 'acing var- 
iables "they ' feel are important. Create program weight based on a particular 
track and fine tune it foi maximum win percentage. This program is designed 
for ' ease of use" The user needs « projramminrj eiptritnce. 

(contains Integrated Bettor™) $299.95 complete 



GD. Gold Dog Analysis™ 

The ONLY ' professional greyhound analysis available that evaluates ALL 

variables $149.95 w/mtegrated Bettor $199.95 

limited Version $299.95 



tiF& 



MHH. Master Harness 
Handicapper™ 

Professional software designed to provide a thorough analysis of all troner and 

pacer races rfl North America and Canada $159.95 complete 

$199.95 w/lntegrated Bettor I mrted $299.95 

Professor Pix Football™ 

Complete STATISTICAL ANALYSIS on Oata Base allowing Designated previous 

games to be evaluated Statistical Senes $99.95 

w/W(vloss Power Ratings $149.95 

NBA. Basketball™ NBA $99.95 ../college $129.95 

w'power ratings $149.95 

LOT. Lottery Analysis™ 

Statistical comparison program designed to detect subtle patterns in winning 

numbers and digits Lottery (3-4 digit i $79.95 

>v /Lotto (Max 99 Digit) $99.95 

PC-3 Portable Computer (4tX) wit* choice of Thoroughbred Grey 
hound or T'Otter™" $249.95 (Includes portable computer and program ) 

M-100 Portable (24k) w/chore oUnoroughored Crey-romd orTrotter 
$649.95 (Includes portable computer and program i 



BROCHURE AVAILABLE 



8 l< 

M-100 

MEMORY 

CHIPS 

$29.95 



Prof. Jones 

1940 W. State St. 
Boise, ID 83702 



48 HR. FREE 
SHIPPING 



TfcJT CALL 
208-342-6939 



TERMS FREE SHIPPING ALL 
SOI IWAHt Add S6 00 hard- 
ware S600COD UPS Blue 
S6 00/0uto'CouimyS9 0O/ 
<D Residents 4% I 3 weens pe' 
sonai checks I Cash price only. 
add 2"m Visa MC I Puces sun- 
iect tn change 



Circle 371 on Reader Service card. 

8 MHz SUPER SPEED-UP ($129.99) 

save time = save money — works also fine with 

H.Disk 

with software to invoke 2, 4, 6, and 8 MHz— For 

Mod. 1 , 3, 4 and 4/P 

SUPER MEMORY UPGRADES (MODE 4 only) 

Al with PAL + Dynamic Rams + Manual (NEWDOS 2.0/2.5) 

other models are coming! 

ONE MEGABYTE MEMORY upgrade ($399.95) 
768K MEMORY upgrade ($339.00) 
5 1 2K MEMORY upgrade ($2 7 5. 50).. c _ n 
256K MEMORY upgrade ($ 1 64.25) N ° W For 4P 

1 28K MEMORY upgrade MOD 4 ($57.50) 
1 28K MEMORY upgrade MOD 4/P ($49.95) 

SUPER RAM ($49.50) 
software to use 1 28K— 1 Meg for applications 

HIGH RESOLUTION GRAPHICS BOARD (384 x 1 92) ($249.00) 

incl. graphics basic — on cassette or disk. 

for MOD I + Video Genie EG3003/3008/I/II 

HIGH RESOLUTION SUPER DRIVER (extended HRG softw. MOD I) 

($75.00) 

We will pay your Import duty (4.3%) and do aH shipping 

for only $8,501 

You have to pay your states tax 
Please specify your exact system configuration when ordering or request- 
ing Information. Write or order to: 

SEATRONICS— P.O.B. 4607— 
6202 ZA BORGHAREN— HOLLAND 

telex 56509 SHIPC/NL 

dealers inquiries invited 

VBA MASTER CA«D 
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SOFTWARE 



MODEL 4/4P Ready-to- 
run Programs (Sales Files, 
Stats, Forecasts). Order 
"SALESPRO" $55. FORM- 
TEC. PO Box D, Three 
Lakes, Wl 54562 



Master Tile - DBMS. Cre 

ate hundreds of custom 
filing systems Mail lists, 
inventory lists, customer 
records and hundreds of 
others. Print labels, lists, 
indexes, directories, 
cards and reports in any 
field order, sorted or un- 
sorted. Ultra fast search 
routine. Choose any field 
to sort (ascending, de- 
scending, alphabetical, 
numeric), calculate or to- 
tal. No programming re- 
quired. Users say: 
"Simple yet powerful", 
"Easy to work with". 
"Superior to Profile", 
'Best information system 
I've seen" Only $59.00. 
Model-I. III. IV/IVP. MC 

VISA 
Ultimate Software. P.O. 
Box 1291. Hayden Lake. 
ID (208) 772-7634 

PAYROLL MODEL 4/4P 

125 Employees, 9 Earn 
ings, 9 Deductions, Prints 
Paychecks, Check Regis- 
ter. Journals, W2's, Cali- 
fornia DE3. P^mployee list, 
etc $75.00. Calif, orders 
add 6%. RBH Software 
2950 Mission, #14 Sol- 
vang. CA 93463. 

CANADIAN LOTTERIES 

Addresses and Winning 
BASIC Program for Models 

i/ni/rv/co-co/ 1000 

$5.00 

SES MARKETING, POB 

23518, Orlando, FL 32867 



ANTI ANTIDISESTA 
BLISHMENTARIANISM. 

Cheap ads for YOUR New 
Used Software Hardware. 
Trash AD. Box 2804, Napa 
94558. 



SOFTWARE MODEL 3 & 4. 

HUNTLEY, 286 EUREKA 
STREET, S.F. CA 94114- 
2437 



BRAND NAME SOFT- 
WARE and accessories for 
TRS-80's & PC's all dis- 
counted. Midwest Supply, 
Box 364-C. Clinton. Iowa 
52732. 



MEOASORT: Sorts mega- 
byte MS-DOS text files. 

Outputs standard, limit, 
tag or keytag files. Multi- 
ple keys. Each key A/D. 
$125 Demo $10 Specify 
1000 1200-2000. JW 
Luhrman 2nd floor 247 
W 38th Street NY, NY 
10018 (212) 382-1722 



Print graphics on the fly 
and more! Lightening 1.3 
boot. Others. Send SASE 
for information. 11575 
Sunshine, Studio City, Cal- 
ifornia 91604-3835 



ISAM under BASIC. Mul- 
tikey indexed files with 
your BASIC programs. Re- 
locatable machine code 
runtime. Fast! Fully inter- 
active utilities included. 
Model I. III. 4LD0S $140 
or SASE for info. Terasoft, 
34 Greenfield, Berea, OH 
44017 



HARDWARE 



MODEL I /III HI-SPEED 
TAPE Interface $49.95, 
14X faster. HHCI. 725 Id- 
lewild, Bel Air, MD, 
21014. 301-838-7692. 



MODEMS, PRINTERS. 
TERMINALS 

Distributor pricing to end 
users and dealers— FREE 
SHIPPING CALL 1-800- 
833 2600 for catalog 



64K RAM installed in Key- 
board: TRS-80 Ml-LII. Su- 
perior performance with 
or without EI. $59.95 
with 90-day warranty. 
ICE; 100 Mill Street; 
Drakes Branch, VA 23937; 
(800) 424-3311. 



DISKS & 
SUPPLIES 



Disks, Program Packaging 
Low prices on BASF and 
other disks. Binders, Slips 
like Tandy 1000. 2000. 
Much more! Free Catalog 
Anthropomorphic. 376 
East Saint Charles. Lom- 
bard. IL 60148 (312) 629- 
5160, 1-800-DEAL-NOW 



SERVICES 



NationServ Online Infor- 
mation Network. 618 

847-2291. Jobservice 
Downloads, Play Games 
Shopping Mall. Classi 
fieds. Message Center 
Etc. 

Get the attention you de- 
serve. 80 Micro is now of- 
fering classified ads at a 
special introductory 
price Reach over 100,000 
readers with news of your 
product or service. Class- 
ified ads on the pages of 
80 Micro get results. 
Write to 80 Micro, 80 Pine 
St., Peterborough, NH 
03458 attn: Classified 
manager for information 
and deadlines. 



Circle 849 on Reader Service Card 



Get the attention you deserve. For only $5 per word, 
your ad will be seen by over 100,000 dedicated TRS 80 
Tandy users. Ads must be received by the 20th of the 
month 3 months prior to publication date. Send yours 
today. 

Please Print Carefully. We'll Do Our Beit. But We Can't Be Responsible 
ror Illegible Writing. 

Name 

Address 

City 



State 



Zip 



Telephone _ 
CATEGORY 



Number of Words 
Ttotal x $5 ' Issue ■ 
For 



(3 words) 

(6) 

(9) 

(12) 

(15) 

(18) 

(21) 

(24) 

(27) 



Make Checks Payable to 80 Micro 

NO AD ACCEPTED WITHOUT PAYMENT 

80PineSt., Peterborough, NH03458 



La 



FINE LINES 



Little Treasures 



Welcome to Fine Lines, 80 Micro's 
new back-page contest. The pur- 
pose of this column is to give you a 
chance to flex your programming mus- 
cles, learn some techniques from other 
readers, and (most importantly) win a 
prize or two. Each month, we'll give you 
a problem that needs solving, along with 
the winning solutions to a previous 
month's problem. If we publish your so- 
lution, you'll receive (at the very least) 
an "I Break for 80 Micro" bumper 
sticker. If we think you've demonstrated 
particular brilliance and creativity, we'll 
send you an 80 Micro T-shirt (don't 
count on it, though; we're stingy with 
the T-shirts). 

If you can't seem to solve the prob- 
lems, don't despair: we'll hand out 
prizes for any contest ideas you submit 
that we use. Since this is the first install- 
ment of Fine Lines, here's a run-down of 
the rules: 

1 . Owners of all TRS-80 and Tandy systems 
with the exception of the Pocket Computers 



are eligible. Well consider degree of difficulty 
when comparing solutions created on different 
machines. 

2. The deadline will always be the 21st of the 
issue month. Thus, this month's deadline is 
Dec. 21. We realize that this doesn't give 
everyone the same amount of time to come up 
with their entries (we apologize to our overseas 
readers especially), but postponing the dead- 
line any longer would add another month to 
our publishing the answers. 

3. Speaking of the answers, they'll appear three 
issues from the issue in which the problem ap- 
pears. Thus, this month's winners will make 
their appearance in the March 1986 issue. 

4. Employees of CW CommunicaUons are not 
eligible. 

5. We will not. unfortunately, be able to return 
entries. 



6. Specify your T-shirt size. Bumper size not 
required. 

Contest No. 1 

Okay, enough of that. Let's get down 
to the first contest. Your task is to write 
a word processor in two lines of Basic. 
Simple enough, eh? 

We'll judge entries on the basis of crea- 
tivity, number of features, and program- 
ming elegance. 

Just to get you going, we whipped up 
the clunky little Model 4 program you 
see in the Program Listing. We're confi- 
dent that you can come up with some- 
thing better. Give it a try: you might win 
yourself a T-shirt. ■ 



Program Listing. 80 Micro's wimpy little two-line word processor. 

110 WHILE X$OCHR5<») :X-0:X$-INKEY$s IF X$-" THEN GOTO 111 ELSE IF X$-CHR$(9) TH 
EN XS-CHR$(25) ELSE IF X$«CHR$(10) THEN X$-CHR$(26) ELSE IF X$-CHR$(11) THEN X$- 
CHR$ ( 27) 
200 PRINT X$;:WEND 



Circle 315 on Reader Service card. 



New dimensions in Bible study. 



THE WORD 

processor 

The KJV or NIV Bible on disks. 

Search for any word or phrase, 

create personal indexes, print any 

verse. Build your own library of 

ipture references. $199.95 

THE GREEK 

A. 1?^. *_ 



Start with any English word and 

find the original Greek, with 

definition and word roots. For any 

Greek word find every translation. 

Includes STRONG'S 

X>NCORDANCE and the KJV 

New Testament. 

(Apple and IBM only.) $199.95 

Include $3 postage/handling. 



Commodore 64, TRSft 
Kaypro, (PM 2.2, MS-DOS 
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2013 Wells Branch Parkway. Suite 304 
Austin, Texas 787 
(512)251-7541 



This Publication 
is available in 
Microform. 




University Microfilms 
International 



Cily 

Siale 



Zip- 



.HXiNunh/ei-hKiud 

Dcpl PR 

Ann Artx.r. Mi. 48U* 
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Select any one of seven tests to perform 
preventive maintenance or to isolate problems. 
Simple, Single-letter commands make MM easy 
to use! Use MM to align the head, adjust the / 
index hole detector, or adjust the speed. / 



"se the MM Radial Alignment Test to check the 
..aad alignment of your drives. No need for an 
oscilloscope or other expensive test equipment! 



19*3 J4M Syatema. Lid I 



SPEED SCOPE 



TO i»0 290 



310 320 330 



Or i v» - Mead - Track - 00 



D- Select drive S -Start nop dnva ' -Return to main i 

Enter le action - 




l9B3J*MSy.t.m» Ltd 



QUICK TEST 
Speed teat 

indai hoia timing last 
Radial alignment teat 
•jimuth rotation last 
HystarMK t«»t 



heck the motor speed of your drives. Or, you 
can even use the Speed Test to adjust the drive 
speed. No need for any test equipment! 



speea. no need tor any test equipmen 



DATA 



r> Select drive S-Stert «top dhve I -Return to i 

Enter »e«ectK>n - 



Use the Quick Test to quickly and automatically 
test five of the most important performance 
parameters of your drive. Monitor your drives 
for long term drift. Isolate problems quickly and 
automatically! 



Now you can make sure your data is being 
recorded properly by the use of the revolutionary 
Memory Minder. 

The Memory Minder from J & M Systems, tests 
your disk's performance and calibration without 
any additional equipment! It measures your 
disk's performance and displays it on your 
screen. / 

This is the most comprehensive disk diagnostic 
program available for your TRS-80 microcomputer. 
"iOu can even ad|ust drive alignment while watchin< 
the display! / 

Spot problems before they endanger your data! 
If you own a disk drive, you need the Memory 
Minder! 



111/4 

>ide (Sta 



TRS-80 Model 111/4 

1 - 48 tpi Single Side (Sta -' 

2 - 48 tpi Double Side 

3 - 96 tpi Double Side $129 
Includes 48 tpi & 96 tpi program diskettes 

TRS-80 Model -I 

1 - 48 tpi Single Side Single Density 
TRS-80 Color Computer and TDP-100 

1 - 48 tpi Single Side (Standard) <7C 

2 - 48 tpi Double Side \ 

MM also available for other models 
J & M SYSTEMS IS THE DRIVING FORCE! 



V/a 



J & M SYSTEMS. LTD. 

1 5 100-A CENTRAL SE 

ALBUQUERQUE, NEW MEXICO 87123 

505/292-4182 
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Introducing the Most Powerful 
Business Software Ever! 



TRS-80 " (Model I, II, III, or 16) • APPLE™* IBM™* OSBORNE™* CP/M™« KAYPRO" 



i.i«ii * \*"« 



CNaXElO&Be*m 




ersaBusiness" Series 



Each VtRSABusiNESS module can be 
or can be linked in any combination to form 

VeRSAReCEIVABLES™ $99.95 

ompiete menu drs . i j, and 

monthly keeps track of all information related to who 

^our company money, and dueac 

I .ments, invoices, and summary 

ii be linked > 

VERSAPAYABLES ' $99.95 

designed to keep track of current and aged payables, keeping you 

-pany owes, and to 
ru a complete record on eat h v. n it, pi i flecks, 
nyables reports, vendor reports, 
- vou can even let your computer automatkali. 
which vouchei paid 

VfRSAPAYROLL" $99.95 

ti i. but easy to use payroll system that 
keeps track of all government-required payroll information .C * 

i:ions are peHormed automatica:;. 
reen for operator approval, A payroll i at ilk autom&ti- 

rte to prevent a check from being printed, or to alter 
ation on it. If desired, totals may be posted to the VFRSAl J ■ . i: ' 

VeRSAINVENTORY" $99.95 

IRY" is a complete inventory control system that gives you • 
to da • ory~ keeps track of all information related to what 

'■■ in stock, out of stock, on backorder. etc . stores U alerts 

point, and allows you to enter and print 
link with the VtRSARECSVAE . . 'print! 

lems below reorder point, inventory v.ii 
ports, period and year to date sales reports -. checklists, etc 

iCQIYIPLJTRQNICS; 

50 N. PASCACK ROAD, SPRING VALLEY, NY. 10977 



purchased and used independently, 

a complete, coordinated business system. 

VERSALEDGER IP $149.95 

Versa Ledgek II™ is a complete accounting system that grows as your business 
grows. Versa Ledger II™ can be used as a simple personal checkbook register, 
expanded to a small business bookkeeping system or developed into a large 
corporate general ledger system without any additional software. 

• VersaLedger II™ gives you almost unlimited storage capacity 

(300 to 10,000 entries per month, depending on the system), 

• stores all check and general ledger information forever, 

• prints tractor-feed checks, 

• handles multiple checkbooks and general ledgers, 

• prints 17 customized accounting reports including check registers, 
balance sheets, income statements, transaction reports, account 
listings, etc. 

VersaLedgek IF" comes with a professionally-written 160 page manual de 
signed for first-time users. The Versa Ledger II™ manual will help you become 
• quickly familiar with VERSA LEDGER II™, using complete sample data files 
supplied on diskette and more than 50 pages of sample pnntouts 



SATISFACTION GUARANTEED! 



Every VERSABLISINESS°* module » gu 
and at a fraction of their cost If you arc not sattshei 
may return it within 30 days for a refund Manuals 
purchased (or $25 each, credited toward a later 
All CP'M based Computers must he equipped u 
iMBAShCor BASIC MO i 



»■!■ "■ dl ■•»■■ .•■;,•'.. ,■ -.--,- . 

I . M Ks\l« SINrSS- module, you 
VI KSABL SINES!*"" iikxIuIc may be 

is. . • -i„v , ..: ... 



To Order: 

Write or call Toll-free (800) 431-2818 
(N.Y.S. residents call 914-425-1535) 



• add S3 for shipping in UPS areas 

• add $4 for CO D or non-UPS areas 



IH Ai FR INQt IRIFS WELCOME 

All prices and specifications subiect to change 



• add $5 to CANADA or MEXICO 

* add prupvr pusta'je elsewhere 



Delivery subn.il !o availability 



■"P JBM PC "* J "" d ,' k J BM L ;'"> OSBORNE trademark Osborne Co,p . XEROX iradernark Xerox Corp KAYPRO trademark Nor. Linear 
/Ij'^wrJ^ "*«! **"??■ lnc , ^ANYO Remark &nyo Corp NEC -remark NEC Corp DEC trademark D^iial Equipment Corp ZENITH trademark Zenith Corp 
TI PROFESSIONAL COMPUTER trademark Texas Instrument*, lnc SUPtRBRAIN trademark Intertec Corp CP M t.ademark Digital Research FPSTON trademark Epson Corp 



